tests/testthat/test-plot_beta_r2.R

context('plot_beta_r2')

cem0 <- new_cem()

test_that('plot_beta_r2 throws an error if there is no fit_indices slot', {
	expect_error(plot_beta_r2(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.