1library(gsubfn) 2library(svUnit) 3gsubfn.tests <- system.file("unitTests", "runit.all.R", package = "gsubfn") 4cat("Running:", gsubfn.tests, "\n") 5source(gsubfn.tests) 6clearLog() 7test.all() 8Log() 9
1library(gsubfn) 2library(svUnit) 3gsubfn.tests <- system.file("unitTests", "runit.all.R", package = "gsubfn") 4cat("Running:", gsubfn.tests, "\n") 5source(gsubfn.tests) 6clearLog() 7test.all() 8Log() 9