ケースコントロール研究

数学いらずの医科統計学PART6 CHAPTER28
 
Lucas ME, et al;2005は、コレラワクチンが有効かどうかを調査した。
\begin{matrix}&case&control\\vaccination&10&94\\non&33&78\\sum&43&172\end{matrix}
フィッシャーの正確確率検定を使ってみる。

Lucas <- matrix(c(10, 33, 94, 78), nr = 2, nc = 2)
fisher.test(Lucas)

	Fisher's Exact Test for Count Data

data:  Lucas 
p-value = 0.0002783
alternative hypothesis: true odds ratio is not equal to 1 
95 percent confidence interval:
 0.104397 0.566291 
sample estimates:
odds ratio 
 0.2530264