#-----------------------------------------------------------------------------------
## Means Model discussed in Example 2.B.3 using DataExam2.B.3
#-----------------------------------------------------------------------------------
Exam2.B.3.lm1 <- lm(formula = y ~ trt, data = DataExam2.B.3)
summary(Exam2.B.3.lm1)
#-----------------------------------------------------------------------------------
## Effectss Model discussed in Example 2.B.3 using DataExam2.B.3
#-----------------------------------------------------------------------------------
Exam2.B.3.lm2 <- lm(formula = y ~ 0 + trt, data = DataExam2.B.3)
summary(Exam2.B.3.lm2)
library(parameters)
model_parameters(Exam2.B.3.lm2)
Run the code above in your browser using DataLab