实验综合成绩 其中 实验评阅 （百分制） 教师签名 实验态度 优 良 中 及格 不及格 实验报告 优 良 中 及格 不及格
华北科技学院
实验报告册
实验课程名称： 非参数统计 实验项目序号： 实验三
实验项目名称： Kruskal-Wallis秩和Friedman秩和检验 实验室名称： 数学应用实验室 开 课 学 期： 2016——2017 学年第 二 学期 20 授 课 教 师： 李慧 实验指导教师： 李慧 专 业 班 级： 应用统计学B142 学 号： 201409024218 姓 名： 夏鹏
实 验 报 告
实验时间： 2017 年 5 月 11 日 一、目的与要求： 1. 了解以及Kruskal-Wallis秩和检验及Friedman秩和检验的原理和步骤； 2. 掌握用R软件进行以及Kruskal-Wallis秩和检验及 Friedman秩和检验的方法。 二．实验环境及要求 R软件等。 三．实验学时 2学时 四．实验内容 1. Kruskal-Wallis秩和检验 2.Friedman秩和检验 五、实验步骤： 1．进入软件开发环境； 2．恰当的组织数据并输入；（数据可自己输入，也可从随书光盘里导出来） 3．编程进行检验； 4．得出结果； 5．生成报告 六、主要操作步骤示例： (1)P119 例4.3 假设检验问题 H0：四种不同药物疗效相同， H1：四种不同药物疗效不同。 Kruskal-Wallis检验程序： > drug<-c(80,203,236,252,284,368,457,393,133,180,100,160,156,295,320,448,465,481,279,194,214,272,330,386,475) > drug [1] 80 203 236 252 284 368 457 393 133 180 100 160 156 295 [15] 320 448 465 481 279 194 214 272 330 386 475 > gr.drug<-c(1,1,1,1,1,1,1,1,2,2,2,2,3,3,3,3,3,3,3,4,4,4,4,4,4) > kruskal.test(drug,gr.drug)
Kruskal-Wallis rank sum test data: drug and gr.drug Kruskal-Wallis chi-squared = 8.0721, df = 3, p-value = 0.04455 结果分析： 从程序结果得知，p值为0.0455，所以拒绝原假设，认为4种药物疗效不同。 (2) 设有来自A,B,C,D四个地区的四名厨师制作名菜京城水煮鱼，想比较它们的品质是否相同。经四位美食评委评分结果如表，试测试四个地区制作的京城水煮鱼这道菜品质有无区别。 1 2 3 4 评委对四名厨师的评分数据表 A B C 85 82 82 87 75 86 90 81 80 75 81 75 D 79 82 76 80 假设检验问题 H0：四个地区的京城水煮鱼品质相同， H1：四个地区的京城水煮鱼品质不同。 Friedman检验程序： > BeijingFish<-c(85,82,82,79,87,75,86,82,90,81,80,76,80,75,81,75) > treat.BF<-c(1,2,3,4,1,2,3,4,1,2,3,4,1,2,3,4) > block.BF<-c(1,1,1,1,2,2,2,2,3,3,3,3,4,4,4,4) > friedman.test(BeijingFish,treat.BF,block.BF) Friedman rank sum test data: BeijingFish, treat.BF and block.BF Friedman chi-squared = 8.1316, df = 3, p-value = 0.04337 结果分析： 由实验结果可以看出，p值为0.04337，故拒绝原假设，认为四个地区的京城水煮鱼品质不同。
