skip_on_os("solaris") skip_if_not_installed("mlr3") skip_if_not_installed("mlr3learners") skip_if_not_installed("glmnet") skip_if_not_installed("ggfortify") set.seed(42) test_that("autoplot.LearnerRegrGlmnet", { requireNamespace("mlr3learners") learner = mlr3::lrn("regr.cv_glmnet")$train(mlr3::tsk("mtcars")) p = autoplot(learner, type = "ggfortify") expect_true(is.ggplot(p)) expect_doppelganger("learner_regr.cv_glmnet", p) })