tests/testthat/test-randomE.R

test_that("randomE", {
    x <- randomE(n_species = 5, n_resources = 12)
    expect_type(x, "double")
    expect_equal(dim(x), c(5, 12))
})
microbiome/miaSim documentation built on Oct. 25, 2024, 7:16 p.m.