powered by
Data for Example 7.20
Stress
A data frame with 12 observations on the following 2 variables.
Prestre
a numeric vector
Poststre
# NOT RUN { str(Stress) attach(Stress) DIF <- Poststre -Prestre qqnorm(DIF) qqline(DIF) shapiro.test(DIF) t.test(Poststre,Prestre,paired=TRUE,alternative="less") detach(Stress) remove(DIF) # }
Run the code above in your browser using DataLab