tests/testthat/testall.R

library('testthat')

res <- test_dir('r2x')
res <- as.data.frame(res)
if (all(res[,'failed'] == 0) && all(res[,'error'] == FALSE)) {
} else {
  stop('failed')
}
rainac/r2x documentation built on May 7, 2022, 5:39 p.m.