Nothing
"itCall" <- function(symbol, ...)
{
args <- list(...)
CLASSES <- as.character(sapply(args, function(x) class(x)[1L]))
COPY <- rep(FALSE, length(args))
.Call(symbol, ..., COPY = COPY, CLASSES = CLASSES, PACKAGE = "ifultools")
}
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.