Nothing
## atatch a time stamp to file names etc.
pasteDate <-
function(..., sep = " ", collapse = NULL, sep.date = sep)
{
out <- paste(..., sep = sep, collapse = collapse)
paste(out, Sys.Date(), sep = sep.date)
}
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.