tests/testthat/test_Tuner.R

In egenn/rtemis: Machine Learning and Visualization

# test-Tuner.R
# ::rtemis::
# 2025 EDG rtemis.org

# Note: Actual tuning is tested in test-Supervised.R with `train()`

# TunerParameters ----
tn_pr <- setup_GridSearch()
tn_pr
desc(tn_pr)
test_that("TunerParameters succeeds", {
  expect_s7_class(TunerParameters(), TunerParameters)
})

# setup_GridSearch() ----
test_that("setup_GridSearch() succeeds", {
  expect_s7_class(setup_GridSearch(), GridSearchParams)
})