Get XKCD Comic Data.

XKCDdata

XKCDdata is a little package to get data from individual xkcd comics.

Installation

# install.packages("devtools")
devtools::install_github("RobertMyles/XKCDdata")

Example:

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.

Viewing Comics

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)