Nothing
get.program.defaults <- function() {
# make a list of potential locations for the datasets file
program.data.dirs <- paste(system.file("programdata/", package = "iDOS"), "/", sep = "");
return (
list(
"program.data.dir" = program.data.dirs[1],
"test.data.dir" = paste(program.data.dirs[1], "testdata/", sep = "")
)
);
}
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.