burger.brand.tracking <- foreign::read.spss(system.file("extdata", "Burger_Brand_Tracking_Dec_2017.sav",
package = "flipExampleData"),
to.data.frame = TRUE)
usethis::use_data(burger.brand.tracking, internal = FALSE, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.