Nothing
require(gWidgets)
options("guiToolkit"="RGtk2")
gWidgetsDir <- system.file("tests",package="gWidgets")
## should be there, but just in case
if(gWidgetsDir != "") {
files <- list.files(gWidgetsDir,
pattern = "\\.R$",
full.names = TRUE)
files <- files[grepl("^ex", basename(files))]
## XXX removed to get past CRAN
# for(unitTest in files) {
# source(unitTest)
# }
}
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.