Nothing
.onLoad <- function(libname, pkgname) {
# cache_dir <- tempdir(TRUE)
# dir.exists(cache_dir)
# options(aquodom.cache_dir = cache_dir)
# packageStartupMessage("options(aquodom.cache_dir)")
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.