df <- data.frame(
gender = factor(c("male", "male", "male", "male", "female", "female", "female")),
answer = factor(c("heads", "heads", "heads", "heads", "tails", "tails", "heads"))
)
associationTest(~ gender + answer, df)
Run the code above in your browser using DataLab