# Exercise 13.2 from "Applied Nonparametric Statistical Methods" (5th edition)
#logoddsratio.2x2(ch13$physical.activity[ch13$gender == "Boy"],
# ch13$tv.viewing[ch13$gender == "Boy"], do.exact = FALSE, do.asymp = TRUE)
#logoddsratio.2x2(ch13$physical.activity[ch13$gender == "Girl"],
# ch13$tv.viewing[ch13$gender == "Girl"], do.exact = FALSE, do.asymp = TRUE)
Run the code above in your browser using DataLab