tests/testthat/test_SAVF_categorical_plot.R

test_that("SAVF_cat_plot provides proper messages and warnings",{
  expect_error(SAVF_cat_plot(c("Tom", "Bill" ,"Jerry"), c(0.1, 0.25, 0.60)))
  expect_error(SAVF_cat_plot(c("Tom", "Bill" ,"Jerry"), c(0.1, 0.65, 0.65)))
})
AFIT-R/MODA documentation built on May 28, 2019, 11:01 a.m.