臨床統計もおもしろいですよ、その１ [無断転載禁止]©2ch.net

ex1 = matrix(c(6,12,12,5), nrow=2)
fisher.test(ex1)
exact2x2::fisher.exact(ex1)