tests/testthat/test-my_knn_cv.R

my_penguins <- na.omit(my_penguins)

test_that("k-nn cross validation", {
  expect_type(my_knn_cv(my_penguins[, 3:6], my_penguins$species, 5, 5), "list")
})
kobesar/mypackage documentation built on Dec. 21, 2021, 7:40 a.m.