# NOT RUN {
diff <- Stress$prestress - Stress$poststress
qqnorm(diff)
qqline(diff)
t.test(diff)
t.test(Stress$prestress, Stress$poststress, paired = TRUE)
# }
# NOT RUN {
wilcox.test(Stress$prestress, Stress$poststress, paired = TRUE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab