\dontrun{
## Save current option state //
opts_old <- getOption(".rapp")
ensureGlobalDirectory()
getRappOption(".rte/global_dir")
file.exists(getRappOption(".rte/global_dir"))
ensureGlobalDirectory(path = file.path(tempdir(), "rapp"))
getRappOption(".rte/global_dir")
file.exists(getRappOption(".rte/global_dir"))
## Clean up //
options(".rapp" = opts_old)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.