tests/testthat/test-my_knn_cv.R

test_that("using 5 folds", {
  covariates <- my_penguins[, 3:6]
  cl <- my_penguins$species
  result <- my_knn_cv(covariates, cl, 10, 5)
})
samcho11/STAT302package documentation built on Dec. 22, 2021, 10:10 p.m.