Rのfisher.test

Rのfisher.testで出てくる p-value はデフォルトでは、片側P値。
両側5%と比べる場合は、2.5%と比べればよい。

> matrix(c(15,4,5,16),nrow=2)
     [,1] [,2]
[1,]   15    5
[2,]    4   16
> fisher.test(matrix(c(15,4,5,16),nrow=2))

	Fisher's Exact Test for Count Data

data:  matrix(c(15, 4, 5, 16), nrow = 2)
p-value = 0.001232
alternative hypothesis: true odds ratio is not equal to 1
95 percent confidence interval:
  2.241457 70.436941
sample estimates:
odds ratio 
  11.08617