## ---- include = FALSE----------------------------------------------------
library(linreg)
data("iris")
## ------------------------------------------------------------------------
example_formula <- Petal.Length~Sepal.Width+Sepal.Length
## ---- results = "hide"---------------------------------------------------
linreg_example <- linreg$new(example_formula, data=iris)
## ------------------------------------------------------------------------
linreg_example$print()
## ------------------------------------------------------------------------
linreg_example$plot()
## ------------------------------------------------------------------------
residuals <- linreg_example$resid()
residuals[1:5]
## ------------------------------------------------------------------------
predicted <- linreg_example$pred()
predicted[1:5]
## ------------------------------------------------------------------------
linreg_example$coef()
## ------------------------------------------------------------------------
linreg_example$summary()
## ---- echo= FALSE--------------------------------------------------------
sessionInfo()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.