tests/testthat/test-my_rf_cv.R

In anikalindley/project3package: Project 3 Package for STAT 302

# test that the function returns an error if the input is a string
test_that("my_rf_cv error ", {
  expect_error(my_rf_cv("string"))
})
# test that the output is numeric
test_that("my_rf_cv output is correct ", {
  expect_true(is.numeric(my_rf_cv(5)))
})
# test that the output is a numeric of type double
test_that("my_rf_cv output is a numeric of type double", {
  expect_type(my_rf_cv(5), "double")
})