Nothing
allTest <- function(dirs = file.path(path.package(package = "processdata"), "unitTests")) {
if(!require(RUnit))
stop("Package 'RUnit' is not installed")
processdataTestSuite <- defineTestSuite("processdata",
dirs = dirs)
RUnitOp <- getOption("RUnit")
RUnitOp$verbose <- 0
RUnitOp$silent <- TRUE
RUnitOp <- options(RUnit = RUnitOp)
testResults <- runTestSuite(processdataTestSuite)
options(RUnit = RUnitOp$RUnit)
return(testResults)
}
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.