Data for Exercise 8.32
Sports
A data frame/tibble with 200 observations on two variables
a factor with levels male
and female
a factor with levels football
, basketball
,
baseball
, and tennis
Kitchens, L. J. (2003) Basic Statistics and Data Analysis. Pacific Grove, CA: Brooks/Cole, a division of Thomson Learning.
T1 <- xtabs(~gender + sport, data = Sports)
T1
#> sport
#> gender football basketball baseball tennis
#> male 33 38 24 5
#> female 38 21 15 26
chisq.test(T1)
#>
#> Pearson's Chi-squared test
#>
#> data: T1
#> X-squared = 21.553, df = 3, p-value = 8.08e-05
#>
rm(T1)