Nothing
## ---- include = FALSE---------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## ----setup, message = F-------------------------------------------------------
library(MMRcaseselection)
## -----------------------------------------------------------------------------
df <- lm(mpg ~ disp + wt, data = mtcars)
most_typical(df)
most_deviant(df)
## -----------------------------------------------------------------------------
# largest positive residual
most_underpredicted(df)
# largest negative residual
most_overpredicted(df)
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.