tests/testthat/test-list_species.R

test_that("list_species works", {
    if (!is_32bit()) {
        species <- EWCE::list_species()
        testthat::expect_true(methods::is(species, "data.frame"))
        testthat::expect_gte(nrow(species), 21)
    }
})
NathanSkene/EWCE documentation built on April 10, 2024, 1:02 a.m.