tests/testthat/test_classif_dbarts.R

context("classif.dbarts")

test_that("autotest", {
  learner <- LearnerClassifDbarts$new()

  learner$param_set$values <- c(
    learner$param_set$values,
    ntree = 5L
  )

  expect_learner(learner)
  result <- run_autotest(learner)
  expect_true(result, info = result$error)
})
mlr3learners/mlr3learners.dbarts documentation built on Aug. 8, 2020, 9:43 p.m.