Nothing
library(dplyr)
src <- "https://www.kaggle.com/c/titanic/data/download/gendermodel.csv"
lcl <- "data-raw/gendermodel.csv"
# if (!file.exists(lcl)) {
# download.file(src, lcl)
# }
raw <- read.csv(lcl, stringsAsFactors = FALSE)
titanic_gender_model <- raw
save(airlines, file = "data/titanic_gender_model.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.