tests/testthat/test-checks.R

context("Various checks")

test_that("fixes NA coefficients", {
  coefs <- c(1.2, NA_real_)
  expect_equal(check_na_coef(coefs), c(1.2, 0))
})
nt-williams/survrct documentation built on July 29, 2021, 7:46 a.m.