tests/testthat/test-get_hazardRate.R

test_that("multiple inputs", {
  expect_equal(round(sum(get_eventProportion(seq(.01,5,length.out = 100),1),4)), 84)
  expect_equal(round(get_eventProportion(0.014,1),4), 0.0139)
})
ChristophAnten/BSSRed documentation built on July 6, 2020, 3:34 a.m.