tests/testthat/test-initial_health.R

library(testthat)
library(CNAIM)


test_that("initial_health uncapped", {
  expect_equal(initial_health(1, 2), 3.694528)
})

test_that("initial_health capped", {
  expect_equal(initial_health(100, 200), 5.5)
})

Try the CNAIM package in your browser

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

CNAIM documentation built on Aug. 31, 2022, 9:13 a.m.