tests/testthat/test-data.R

test_that("rivers_model", {
  expect_identical(check_data(rivers_model, values = list(
    River1 = c(250, 5000), River2 = c(250, 5000)),
                              nrow = 100L), rivers_model)
})
poissonconsulting/eggdewater documentation built on March 8, 2024, 9:36 a.m.