Nothing
.onUnload <- function(libpath)
{
library.dynam.unload("rtracklayer", libpath)
}
setUserUdcDir <- function() {
dir <- paste0("/tmp/udcCache_", Sys.info()[["user"]])
.Call(R_setUserUdcDir, dir)
}
.onLoad <- function(libname, pkgname)
{
setUserUdcDir()
}
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.