powered by
The p5.11 data frame has 8 observations on an experiment with a catapult. This data set is used in Exercise 5.13 of the 6th edition of MPV.
p5.11
data(p5.11)
This data frame contains the following columns:
hook
arm length
start angle
stop angle
response 1
response 2
response 3
p5.13
attach(p5.11) ybar.i <- apply(p5.11[,5:7], 1, mean) sd.i <- apply(p5.11[,5:7], 1, sd) y.lm <- lm(ybar.i ~ x1 + x2 + x3 + x4) plot(y.lm, which=1) detach(p5.11)
Run the code above in your browser using DataLab