if (FALSE) { # interactive()
# download The Count of Monte Cristo
gutenberg_download(1184)
# download two books: Wuthering Heights and Jane Eyre
books <- gutenberg_download(c(768, 1260), meta_fields = "title")
books
dplyr::count(books, title)
# download all books from Jane Austen
austen <- gutenberg_works(author == "Austen, Jane") |>
gutenberg_download(meta_fields = "title")
austen
dplyr::count(austen, title)
}
Run the code above in your browser using DataLab