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