Skip to content
Prev 86674 / 398513 Next

creating 3-way tables for mantelhaen.test

library(gtools)
index <- cbind(combinations(7,2),8)
lapply(as.data.frame(t(index)), function(x) 
mantelhaen.test(table(mydata[,x])))


Taka Matzmoto a ??crit :