Nothing
".onLoad" <- function(libname, pkgname)
{
}
".onUnload" <- function(libpath)
{
}
".onAttach" <- function(libname, pkgname)
{
if (interactive())
{
packageStartupMessage('Loading ', pkgname, ' version ', as.character(packageVersion(pkgname)))
}
}
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.