Nothing
# Author: Babak Naimi, naimi.b@gmail.com
# Date : August 2017
# Version 1.1
# Licence GPL v3
.onAttach <- function(libname, pkgname) {
pkg.info <- utils::packageDescription('rts')
packageStartupMessage(paste("rts ", pkg.info[["Version"]], " (", pkg.info["Date"], ")", sep=""))
.setAuth()
.setMRT()
#.rtsOptions$addOption('MD_curlHandle',RCurl::getCurlHandle())
invisible(0)
}
.onUnload <- function(libpath) {
if (".._MD_curlHandle" %in% ls(envir=as.environment(".GlobalEnv"))) rm('.._MD_curlHandle',envir=as.environment(".GlobalEnv"))
invisible(0)
}
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.