powered by
E4.12
data(E4.12)
Intern
Prof
m1 <- lm(Time ~ SC+DC+MR+TR-1, data=E4.12, subset=Dietician=="Prof") summary(m1)
Run the code above in your browser using DataLab