inst/unitTests/Runitest.R

require("RUnit", quietly=TRUE) || stop("RUnit package not found")
require("neaGUI")



runitPat <- ".*_test\\.[rR]$"
runitDirs <- c(".")
suite.neaGUI  <- defineTestSuite(name="neaGUI",
                         dirs=runitDirs,
                         testFileRegexp=runitPat,
                         rngKind="default",
                         rngNormalKind="default")

testResult <- runTestSuite(testsuite.neaGUI )
printTextProtocol(testResult)

Try the neaGUI package in your browser

Any scripts or data that you put into this service are public.

neaGUI documentation built on May 2, 2019, 5:41 p.m.