tests/testthat/test-n_missing.R

test_vector <- c(1, 1, NA, 2, 3, 3, 4, 3, 1, NA)

test_that("n_missing() works", {
  expect_equal(n_missing(test_vector), 2)
})
INS-Basel/hsrtools documentation built on April 20, 2024, 5:15 p.m.