MHChisqTest(x, srow = 1:nrow(x), scol = 1:ncol(x))
"htest"
containing the following
components:
chisq.test
,
for calculating correlation of a table: corr
## A r x c table Agresti (2002, p. 57) Job Satisfaction
Job <- matrix(c(1,2,1,0, 3,3,6,1, 10,10,14,9, 6,7,12,11), 4, 4,
dimnames = list(income = c("< 15k", "15-25k", "25-40k", "> 40k"),
satisfaction = c("VeryD", "LittleD", "ModerateS", "VeryS"))
)
MHChisqTest(Job, srow=c(7.5,20,32.5,60))
Run the code above in your browser using DataLab