Download data from individual XKCD comics, written by Randall Munroe < https://xkcd.com/>.
XKCDdata is a little package to get data from individual xkcd comics.
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 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: