Data for Exercise 8.23
Ferraro1
A data frame/tibble with 1000 observations on two variables
a factor with levels Men
and
Women
a character vector of 1984 president and vice-president candidates
Kitchens, L. J. (2003) Basic Statistics and Data Analysis. Pacific Grove, CA: Brooks/Cole, a division of Thomson Learning.
T1 <- xtabs(~gender + candidate, data = Ferraro1)
T1
#> candidate
#> gender Reagan/Bush Mondale/Ferraro Undecided
#> Men 245 140 115
#> Women 205 160 135
chisq.test(T1)
#>
#> Pearson's Chi-squared test
#>
#> data: T1
#> X-squared = 6.4889, df = 2, p-value = 0.03899
#>
rm(T1)