tests/testthat/test_pmml.naiveBayes.R

test_that("error when object is not naiveBayes", {
  a <- "foo"
  expect_error(pmml.naiveBayes(a), "Not a legitimate naiveBayes object")
})
SoftwareAG/r-pmml documentation built on March 23, 2022, 6:40 a.m.