Nothing
retrieveFunctionArguments <- function(fun_f_1) {
if (is.primitive(fun_f_1)) {
a <- args(fun_f_1)
if (is.null(a)) return(a)
formals(a)
} else formals(fun_f_1)
}
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.