Data for Exercise 7.86

Oxytocin

Format

A data frame/tibble with 11 observations on three variables

subject

a numeric vector indicating each subject

before

mean arterial blood pressure of subject before receiving oxytocin

after

mean arterial blood pressure of subject after receiving oxytocin

References

Kitchens, L. J. (2003) Basic Statistics and Data Analysis. Pacific Grove, CA: Brooks/Cole, a division of Thomson Learning.

Examples


diff = Oxytocin$after - Oxytocin$before
qqnorm(diff)
qqline(diff)

shapiro.test(diff)
#> 
#> 	Shapiro-Wilk normality test
#> 
#> data:  diff
#> W = 0.94464, p-value = 0.5765
#> 
t.test(Oxytocin$after, Oxytocin$before, paired = TRUE)
#> 
#> 	Paired t-test
#> 
#> data:  Oxytocin$after and Oxytocin$before
#> t = -8.506, df = 10, p-value = 6.854e-06
#> alternative hypothesis: true difference in means is not equal to 0
#> 95 percent confidence interval:
#>  -57.01717 -33.34646
#> sample estimates:
#> mean of the differences 
#>               -45.18182 
#> 
rm(diff)