cc18 <- get_cces_dataverse("2018")
set.seed(02138)
cc18_samp <- cc18 %>%
sample_n(1000)
usethis::use_data(cc18_samp, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.