Nothing
test_that("Can handle four variables", {
mod <- Framingham |>
model_train(TenYearCHD ~ age + sex + diabetes + BPMeds,
family="binomial")
P <- model_plot(mod)
expect_snapshot_file(gg_in_tmp_png(P), "four-facets.png")
})
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.