library(gutenbergr)
timemachine <- gutenberg_download(35)$text
timemachine <- timemachine[9:length(timemachine)]
waroftheworlds <- gutenberg_download(36)$text
waroftheworlds <- waroftheworlds[19:length(waroftheworlds)]
doctormoreau <- gutenberg_download(159)$text
doctormoreau <- doctormoreau[48:length(doctormoreau)]
annveronica <- gutenberg_download(524)$text
annveronica <- annveronica[44:length(annveronica)]
mrpolly <- gutenberg_download(7308)$text
mrpolly <- mrpolly[9:length(mrpolly)]
invisibleman <- gutenberg_download(5230)$text
invisibleman <- invisibleman[44:length(invisibleman)]
## Add data files to project
## code to prepare `DATASET` dataset goes here
## cleaned up data files to be in data/ folder in .RData format.
usethis::use_data(timemachine, overwrite = TRUE)
usethis::use_data(waroftheworlds, overwrite = TRUE)
usethis::use_data(doctormoreau, overwrite = TRUE)
usethis::use_data(annveronica, overwrite = TRUE)
usethis::use_data(mrpolly, overwrite = TRUE)
usethis::use_data(invisibleman, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.