if (exists("testing")) {
  data("ChickWeight")
  regression <- lm(weight ~ Time, data = ChickWeight)
}
knitr::kable(coef(regression))

Values vs. fitted values.

pars <- par(ask = FALSE)
plot(regression$model[,1], fitted(regression))

Diagnostics (click to show)

plot(regression, ask = FALSE)
par(pars)



Try the rmdpartials package in your browser

Any scripts or data that you put into this service are public.

rmdpartials documentation built on July 2, 2020, 3:22 a.m.