Nothing
source("helpers.R")
using("marginaleffects")
requiet("robust")
# no validity
dat <- mtcars
dat$cyl <- factor(dat$cyl)
mod <- lmRob(mpg ~ hp + cyl, data = mtcars)
expect_slopes(mod, n_unique = 1)
expect_predictions(predictions(mod))
rm(list = ls())
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.