inst/paramtest/test_paramtest_surv.gbm.R

In mlr3learners/mlr3learners.gbm: gbm learner from gbm package for mlr3

library(mlr3learners.gbm)

test_that("surv.gbm", {
  learner = lrn("surv.gbm")
  fun = gbm::gbm
  exclude = c(
    "formula", # handled by mlr3
    "data", # handled by mlr3
    "weights", # handled by mlr3
    "class.stratify.cv" # handled by mlr3
  )

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