library(dplyr)
tudors <- read.csv(file.path("data-raw", "tudors.csv"), stringsAsFactors = FALSE) %>%
as_tibble
usethis::use_data(tudors, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.