# NOT RUN {
# }
# NOT RUN {
# download Voltaire's "Candide"
wikisource_book("https://en.wikisource.org/wiki/Candide")
# download "Candide" in French and Spanish
library(purrr)
fr <- "https://fr.wikisource.org/wiki/Candide,_ou_l%E2%80%99Optimisme/Garnier_1877"
es <- "https://es.wikisource.org/wiki/C%C3%A1ndido,_o_el_optimismo"
books <- map_df(c(fr, es), wikisource_book)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab