\dontrun{
## Save current options state //
opts_old <- getOption(".rapp")
## Initialize options //
res <- initializeRappOptions()
ls(res, all.names = TRUE)
ls(res$.rte, all.names = TRUE)
values <- lapply(expected, get, envir = res$.rte)
names(values) <- ls(res$.rte, all.names = TRUE)
values
## Clean up //
options(".rapp" = opts_old)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.