Nothing
skip_if_not_installed("mlr3")
skip_if_not_installed("rpart")
skip_if_not_installed("partykit")
skip_if_not_installed("ggparty")
test_that("autoplot.LearnerRegrRpart", {
learner = mlr3::lrn("regr.rpart", keep_model = TRUE)$train(mlr3::tsk("mtcars"))
p = autoplot(learner, type = "ggparty")
expect_true(is.ggplot(p))
expect_doppelganger("learner_regr.rpart", p)
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.