#行X列卡方检验
ns<-c(199,164,118) #成功例数(阳性数)
nt<-c(206,182,144) #实验次数
prop.test(ns,nt)
3-sample test for equality of proportions without continuity correction
data: ns out of nt
X-squared = 21.038, df = 2, p-value = 2.702e-05
alternative hypothesis: two.sided
sample estimates:
prop 1 prop 2 prop 3
0.9660194 0.9010989 0.8194444