tests/testthat/test-mfa-simulate.R

context("mfa simulation")

test_that("mfa simulation output is valid", {
    skip_if_not_installed("mfa")
    expect_true(validObject(mfaSimulate()))
    expect_true(validObject(mfaSimulate(dropout.present = TRUE)))
})

Try the splatter package in your browser

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

splatter documentation built on Dec. 3, 2020, 2:01 a.m.