tests/testthat/test-only_NAs.R

X <- as.data.frame(matrix(NA,20,4))

test_that("No changes if there are no NAs", {
  expect_error(ClustImpute(X,3),"All values of X are NA")
})

Try the ClustImpute package in your browser

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

ClustImpute documentation built on May 31, 2021, 9:06 a.m.