Nothing
testDir <- system.file("unitTests", package="systemPipeR")
test.import <- function(){
## Test import for generating SYSargs instance
args <- systemArgs(sysma=file.path(testDir, "tophat.param"), mytargets=file.path(testDir, "targets.txt"))
checkTrue(class(args)=="SYSargs")
}
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.