lab4G3: Computer lab 4

## ---- include = FALSE----------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## ----setup---------------------------------------------------------------
library(lab4G3)

## ------------------------------------------------------------------------
library(lab4G3)
library(ggplot2)

## ------------------------------------------------------------------------
my_example<-linreg(formula = Petal.Length~.,data=iris)

## ------------------------------------------------------------------------
coef(my_example)

## ----fig.width=5,fig.height=5,warning=FALSE------------------------------
plot(my_example)

## ------------------------------------------------------------------------
head(pred(my_example))

## ------------------------------------------------------------------------
print(my_example)

## ------------------------------------------------------------------------
head(resid(my_example))

## ------------------------------------------------------------------------
summary(my_example)