tests/testthat/test-my_rf_cv.R

library(STAT302package)

test_that("my_rf_cv works", {
  expect_equal(my_rf_cv(5), 76, tolerance = .5)
})

test_that("wrong input throws error", {
  expect_error(my_rf_cv("a string"))
})
jingnanyuan/STAT302package documentation built on April 2, 2020, 9:42 p.m.