Nothing
# TODO: Add comment
#
# Author: jli
###############################################################################
.onAttach <- function(libname, pkgname ){
if (!exists(".tmcnEnv", envir = .GlobalEnv)) {
envir0 = as.environment(1)
assign(".tmcnEnv", new.env(), envir = envir0)
}
options(tmcn.oldlocale = Sys.getlocale("LC_CTYPE"))
packageStartupMessage( paste("# tmcn Version:", utils::packageDescription("tmcn", fields = "Version")) )
}
.onUnload <- function(libpath) {
library.dynam.unload("tmcn", libpath)
}
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.