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")
})

Try the pmml package in your browser

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

pmml documentation built on March 18, 2022, 5:49 p.m.