Nothing
## a class to hold unevaluated function calls
setClass(
"safecall",
slots=c(
call="call",
envir="environment"
),
prototype=prototype(
call=NULL,
envir=NULL
)
)
safecall <- function (...) {
new("safecall",call=match.call(),envir=parent.frame())
}
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.