tests/testthat/test-is_one_na.R

context("is_one_na")

test_that("use", {

  testthat::expect_true(is_one_na(NA))
  testthat::expect_false(is_one_na(NULL))
  testthat::expect_false(is_one_na(c(NA, NA)))
  testthat::expect_false(is_one_na(c(NULL, NULL)))
})
ropensci/beautier documentation built on March 12, 2019, 8:27 p.m.