Nothing
.cache <- new.env(TRUE)
#' clears the cache
#'
#' @export
cache_clear <- function(){
rm( list = ls(envir=.cache)
, envir = .cache
)
}
cache_add <- function(url, result){
.cache[[url]] <- result
result
}
cache_get <- function(url){
.cache[[url]]
}
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.