回复 第2楼 的 sunshine998：我试了一下，好像不行~
> sapply(A1[,1:24],FUN=oddsratio)
Error in uniroot(function(or) { :
f() values at end points not of opposite sign
In addition: Warning messages:
1: In chisq.test(xx, correct = correction) :
Chi-squared approximation may be incorrect
2: In chisq.test(xx, correct = correction) :
Chi-squared approximation may be incorrect
3: In chisq.test(xx, correct = correction) :
Chi-squared approximation may be incorrect
4: In chisq.test(xx, correct = correction) :
Chi-squared approximation may be incorrect
5: In chisq.test(xx, correct = correction) :
Chi-squared approximation may be incorrect
>
