Nothing
setGlobal <- function(x,value) {
#env <- as.environment("package:semtree")
env <- .GlobalEnv
assign(x, value, envir=env)
}
getGlobal <- function(x)
{
#env <- as.environment("package:semtree")
env <- .GlobalEnv
get(x, envir=env)
}
global.node.id <- NA
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.