tests/testthat/test_TaskRegr.R

skip_if_not_installed("mlr3")

test_that("autoplot.TaskRegr", {
  task = mlr3::tsk("mtcars")$select(c("carb", "cyl"))

  p = autoplot(task, type = "target")
  expect_true(is.ggplot(p))
  expect_doppelganger("taskregr_target", p)

  p = autoplot(task, type = "pairs")
  expect_s3_class(p, "ggmatrix")
  expect_doppelganger("taskregr_pairs", p)
})
mlr-org/mlr3viz documentation built on March 8, 2024, 4:21 a.m.