# NOT RUN {
# }
# NOT RUN {
# download Sonnet 18 of Shakespeare
wikisource_page("https://en.wikisource.org/wiki/Shakespeare%27s_Sonnets/Sonnet_18", "Sonnet 18")
# download Sonnets 116, 73 and 130 of Shakespeare
library(purrr)
urls <- paste0("https://en.wikisource.org/wiki/Shakespeare%27s_Sonnets/Sonnet_", c(116, 73, 130))
sonnets <- map2_df(urls, paste0("Sonnet ", c(116, 73, 130)), wikisource_page)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab