tests/testthat/test-mod_summary.R

context('mod_summary')

cem0 <- new_cem()

test_that('mod_summary returns an error when there are no modules', {
	expect_error(mod_summary(cem0))
})

Try the CEMiTool package in your browser

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

CEMiTool documentation built on March 13, 2021, 2 a.m.