tests/testthat/test_TaskSupervised.R

context("TaskSupervised")

test_that("TaskSupervised Construction", {
  b = as_data_backend(iris)
  task = TaskSupervised$new(id = "foo", "classif", b, target = "Species")
  b = task$backend
  expect_backend(b)
  expect_task(task)
  expect_task_supervised(task)
})
mllg/mlr3 documentation built on Sept. 27, 2019, 9:38 a.m.