tests/runCompare.R

runCompare <<- function(name){
	setwd(paste0("../", name, "/"))
	stopifnot(require("testthat"),
		require("IBTSindices"))
	source("../compareRuns.R")
	source("script.R")
	load("runExpected.Rdata")
	compareRuns(run, runExp)
}
natoyaj/TestPackage documentation built on March 11, 2020, 7:46 a.m.