tests/testthat/test-defunct.R

df <- tibble::tibble(x = c("A", NA))

test_that("miss_var_prop is defunct", {
  expect_error(miss_var_prop(df))
})

test_that("complete_var_prop is defunct", {
  expect_error(complete_var_prop(df))
})

test_that("miss_var_pct is defunct", {
  expect_error(miss_var_pct(df))
})

test_that("complete_var_pct is defunct", {
  expect_error(complete_var_pct(df))
})

test_that("miss_case_prop is defunct", {
  expect_error(miss_case_prop(df))
})

test_that("complete_case_prop is defunct", {
  expect_error(complete_case_prop(df))
})

test_that("miss_case_pct is defunct", {
  expect_error(miss_case_pct(df))
})

test_that("complete_case_pct is defunct", {
  expect_error(complete_case_pct(df))
})

test_that("replace_to_na is defunct", {
  expect_error(replace_to_na(df))
})

Try the naniar package in your browser

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

naniar documentation built on Feb. 16, 2023, 5:11 p.m.