成组设计四格表资料的卡方检验-大话统计成组设计四格表资料卡方检验之SAS、R实现1卡方检验的应用范围数据类型：定性资料（二分类资料）用途：检??

成组设计四格表资料的卡方检验-大话统计
成组设计四格表资料卡方检验之SAS、R实现1卡方检验的应用范围
数据类型：定性资料（二分类资料）
用途：检验成组设计两独立样本总体频率分布是否相同
2极简标题举例
将病情相似的169名消化道溃疡患者随机分成两组，分别用奥美拉唑与雷尼替丁两种药物治疗，4周后评价其疗效张雨菲，结果见下表。问两种药物治疗消化性溃疡的愈合率有无差别？
处理
愈合
未愈合
合计
愈合率（%）
奥美拉唑
64
21
85
75.29
雷尼替丁
51
33
84
60.71
合计
115
54
169
68.05
SAS实现
第一步：建立数据集
datarate;
doa=1to2;dob=1to2;
inputf@@;output;
end;end;

cards;
64 21
51 33
;run;
第二步：生成四格表暴走分卫，计算理论频数张文露，c2检验
procfreqdata=rate;
weightf;
tablesa*b/expectedchisq exact measures;

run;
第三步：结果输出与解读




结果输出：表一四格表每个格子第一到五行分别为实际频数、理论频数、总百分比、行百分比、列百分比；表二为卡方检验结果；表三为Fisher精确概率法结果；表四为OR值及95%可信区间。
结果解读：两组频率的差异具有统计学意义置之不理造句，可以认为奥美拉唑的愈合率比雷尼替丁的愈合率高，奥美拉唑治疗消化性溃疡疗效是雷尼替丁的1.972倍。
R实现
第一步：建立数据集
#生成2X2矩阵，先排列数据，再排行数据
rate <- matrix(c(64,21,51樊长使,33),nrow=2,ncol=2)
第二步：卡方检验
rsqc <- chisq.test(rate)#卡方检验双肾草 ，默认计算连续调整卡方，同时计算理论频数
rsqc$expected #查看理论频数
rsq <- chisq.test(rate,correct=F) #correct=F指定不进行连续调整
rsq$statistic#查看c2值
rsq$p.value#查看P值
fisher.test(rate) # 计算Fisher精确概率
结果输出：

结果解释同上
大话说
人世间，或许你本是烙在他心头的一颗朱砂，最后却成了一朵让他可望而不可及的彼岸花孙集斌。不知是光阴的交错还是轮回的因果五色妖姬，有种爱杨德才征婚，永远只离你一转身的距离，一旦开始，永无结束。
人世间叶俊英 ，父亲节的诗歌或许你本是烙在他心头的一颗朱砂，最后却成了一朵让他可望而不可及的彼岸花褚一斌。不知是光阴的交错还是轮回的因果裘慕远，有种爱全名目击，永远只离你一转身的距离黄芩胶囊 ，戴帆 一旦开始，永无结束。
注意事项：
1）样本量n>=40且理论频数T>=5,采用普通卡方结果（表二第一行）；
2）n>=40,1=<T<5,采用连续调整卡方结果（表二第三行）；
3）n<40或T<1或卡方检验所得概率P接近检验水准α，采用Fisher确切概率法结果（表三最后一行）兰尼库克。
本例中样本量（169）大于40且理论频数均大于5，故读取表二第一行结果，c2=4.1305科韵路地陷，
P=0.0421，OR=1.9720惊变20年 , 95%CI（1.0199-3.8127）沁人心脾造句。
作者：牛晓歌
编辑：王丽娟
校对：大话统计工作组

全文详见：https://p66p.cn/14613.html

TOP