cache <- new.env(hash = TRUE, parent = emptyenv())
.onLoad <- function(libname, pkgname) {
cache[["stack"]] <- list()
cache[["trace"]] <- new.env(hash = TRUE, parent = emptyenv())
invisible()
}
.onUnload <- function (libpath) {
library.dynam.unload("typeR", libpath)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.