Nothing
. <- function(...) {
l <- list(...)
if(is.null(nam <- names(l))) names(l) <- .c(...)
else if(anyv(nam, "")) {
wn <- whichv(nam, "")
nam[wn] <- .c(...)[wn]
names(l) <- nam
}
l
}
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.