tests/testthat/test_TaskSurv.R

context("TaskSurv")

test_that("Task duplicates rows", {
  task = tsk("lung")
  expect_task_surv(task)
  expect_set_equal(extract_vars(task$formula())$rhs, ".")
})
mlr-org/mlr3survival documentation built on Oct. 21, 2019, 7:42 p.m.