Nothing
detFileName <-
function (file.name)
{
sub = substr(file.name,1,3)
if(sub == "gse")
file.name = toupper(file.name)
else
file.name = file.name
return (file.name)
}
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.