Nothing
#[export]
env.copy<-function(x,all.names=FALSE){
y<-new.env()
all.vars<-ls(x,all.names = all.names)
for(var in all.vars){
val<-x[[var]]
y[[var]] <- if(is.environment(val)) env.copy(val,all.names) else x[[var]]
}
y
}
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.