# prepare data frame "extra"
library(tidyverse)
extra %>%
mutate_at(vars(i01:i10), funs(as.integer)) -> extra
save(extra, file = "data/extra.RData")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.