Effects of a drug and electroshock therapy on the ability to solve simple tasks

Source: R/BSDA-package.R

Data for Exercises 10.11 and 10.12

Shkdrug

Format

A data frame/tibble with 64 observations on two variables

treatment

type of treament Drug/NoS, Drug/Shk, NoDg/NoS, or NoDrug/S

response

number of tasks completed in a 10-minute period

References

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

Examples


boxplot(response ~ treatment, data = Shkdrug, col = "gray")

model <- lm(response ~ treatment, data = Shkdrug)
anova(model)
#> Analysis of Variance Table
#> 
#> Response: response
#>           Df  Sum Sq Mean Sq F value    Pr(>F)    
#> treatment  3  58.125 19.3750  11.006 7.435e-06 ***
#> Residuals 60 105.625  1.7604                      
#> ---
#> Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
rm(model)