#' --- #' title: "UCBAdmissions data: Testing associations" #' author: "Michael Friendly" #' date: "26 Feb 2016" #' --- library(vcdExtra) # separate Chisquare tests for each department for (dept in 1:6) { print(chisq.test(UCBAdmissions[,,dept])) } # odds ratios summary(oddsratio(UCBAdmissions)) # Other tests mantelhaen.test(UCBAdmissions) woolf_test(UCBAdmissions) CMHtest(UCBAdmissions)