inst/paramtest/test_paramtest_classif.liblinear1l2svc.R

In mlr3learners/mlr3learners.liblinear: Learners from LiblineaR package for mlr3

library(mlr3learners.liblinear)

test_that("classif.liblinearl1l2svc", {
  learner = lrn("classif.liblinearl1l2svc")
  fun = LiblineaR::LiblineaR
  exclude = c(
    "data", # handled by mlr3
    "target", # handled by mlr3
    "type", # determined by the chosen learner
    "svr_eps" # only for regression
  )

  ParamTest = run_paramtest(learner, fun, exclude)
  expect_true(ParamTest, info = paste0(
    "
Missing parameters:
",
    paste0("- '", ParamTest$missing, "'", collapse = "
")))
})