powered by
Data for Example 7.19
Selfdefe
A data frame with 9 observations on the following 3 variables.
Woman
a numeric vector
Before
After
# NOT RUN { str(Selfdefe) attach(Selfdefe) DIF <- After-Before qqnorm(DIF) qqline(DIF) shapiro.test(DIF) t.test(After,Before,paired=TRUE,alternative="greater") detach(Selfdefe) remove(DIF) # }
Run the code above in your browser using DataLab