XKCDdata is a little package to get data from individual xkcd comics.
# install.packages("devtools")
devtools::install_github("RobertMyles/XKCDdata")Let’s get data on this comic (it’s number 1421):
library(XKCDdata)
get_comic(comic = 1421)
#> # A tibble: 1 x 11
#> month num link year news safe_title
#> <chr> <int> <chr> <chr> <chr> <chr>
#> 1 9 1421 http://xkcd.com/1421 2014 Future Self
#> # ... with 5 more variables: transcript <chr>, alt <chr>, img <chr>,
#> # title <chr>, day <chr>Or you can get a list of comics pretty easily using purrr,
apply() or for loops. With purrr, it would be something
like:
# list of comics:
cm <- c(1421, 641, 87, 92)
purrr::map_df(cm, get_comic)Then you could plot it XKCD-style with the xkcd package if you wanted.
Thanks to Colin, you can view the comics inside your default Viewer (in the Viewer pane if you’re on RStudio)! Give it a shot with:
print_xkcd(1)
Need a high-speed mirror for your open-source project?
Contact our mirror admin team at info@clientvps.com.
This archive is provided as a free public service to the community.
Proudly supported by infrastructure from VPSPulse , RxServers , BuyNumber , UnitVPS , OffshoreName and secure payment technology by ArionPay.