## ------------------------------------------------------------------------
require("Lab4");
require("ggplot2");
linreg<-linreg$new(formula=Petal.Length ~ Species,data=iris)
linreg$print()
## ------------------------------------------------------------------------
linreg$print()
## ---- results = 'hide', message = FALSE, fig.width = 5-------------------
linreg$plot()
## ------------------------------------------------------------------------
res<-linreg$resid()
head(res,5)
## ------------------------------------------------------------------------
pre<-linreg$pred()
head(pre,5)
## ------------------------------------------------------------------------
coef<-linreg$coef()
head(coef,5)
## ------------------------------------------------------------------------
linreg$summary()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.