search for: bugtab

...) CrossTable in the "gregmisc" package fails when the fisher.exact test produces an error (I suspect this is because the number of cases is too large). This can be fixed using "FTt <- try(fisher.test(t, alternative = "two.sided"))" or by making the test optional. bugtab <- array(c( 24, 31, 2, 50, 4, 101, 16, 130, 0, 29, 3, 52, 3, 39, 11, 210)) dim(bugtab)<-c(4,4) bugtab<-t(bugtab) rownames(bugtab)<-c("a","b","c","d") colnames(bugtab)<-c("A","B","C","D") bugtab...