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)



rubenarslan/rmarkdownpartials documentation built on June 10, 2020, 11:17 p.m.