#-----------------------------------------------------------------------------------
## Linear Model discussed in Example 2.B.1 using simple regression data of Table1.1
#-----------------------------------------------------------------------------------
data(Table1.1)
Exam2.B.1.lm1 <- lm(formula = y~x, data = Table1.1)
summary(Exam2.B.1.lm1)
library(parameters)
model_parameters(Exam2.B.1.lm1)
DesignMatrix.lm1 <- model.matrix (object = Exam2.B.1.lm1)
DesignMatrix.lm1
Run the code above in your browser using DataLab