ds_mt <- mtcars %>% dplyr::mutate( cyl = as.integer(cyl), am = factor(am, labels = c("auto", "manual")), vs = factor(vs, labels = c("V", "S")) ) readr::write_rds(ds_mt, here::here("inst", "testdata", "ds_mt_temp.rds"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.