Nothing
# Grab new game IDs
library(pitchRx)
data(gids)
last.game <- sort(gids)[length(gids)]
last.date <- as.Date(substr(last.game, 5, 14), format = "%Y_%m_%d")
new.gids <- pitchRx:::updateGids(last.date, last.date + 371)
gids <- unique(c(gids, new.gids))
save(gids, file = "~/Desktop/github/local/pitchRx/data/gids.rda")
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.