tests/testthat/test_surv_svm.R

context("surv.svm")

test_that("autotest", {
  learner = LearnerSurvSVM$new()
  learner$param_set$values = list(gamma.mu = 0.1)
  expect_learner(learner)
  result = run_autotest(learner, exclude = "feat_single")
  expect_true(result, info = result$error)
})
RaphaelS1/mlr3learners.ranger documentation built on July 31, 2020, 10:16 p.m.