tests/testthat/test-nominal_split.R

test_that("nominal split works", {
        split <- metaSplitNominal(megametadata::tester, "AccountLevel")
  expect_equal(split$nominal, "Species")
  expect_equal(split$continuous, c("Sepal.Length", "Sepal.Width",  "Petal.Length", "Petal.Width" ))
})
JDOsborne1/meta-monster documentation built on April 4, 2020, 9:50 p.m.