Nothing
.onLoad <- function(libname, pkgname) {
prev_options <- options()
new_options <- list(
wood_cache_time = 60 * 60 * 3
)
unset_inds <- !(names(new_options) %in% names(prev_options))
if (any(unset_inds)) {
options(new_options[unset_inds])
}
invisible()
}
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.