tests/testthat/test-DataCleaning.R

In TangledFeatures: Feature Selection in Highly Correlated Spaces

testthat::test_that("errors", {
  testthat::expect_error(
    DataCleaning(-1),
    "Value needs to be a data frame or data table"
  )

  testthat::expect_error(
    DataCleaning(2),
    "Value needs to be a data frame or data table"
  )
})