统计软件实验教学要件 实验项目十二 R软件环境下的假设检验.docVIP

实验项目十二 R软件环境下的假设检验 一、实验目的 运用t.test( )函数来完成单样本t检验、独立样本t检验和配对样本t检验 运用var.test( )函数来实现方差齐性检验，并利用prop.test( )和binom.test( )函数来完成二项总体的参数检验 掌握运用R进行假设检验的基本操作过程，并能读懂R输出的结果 二、实验环境 系统软件Windows2000或WindowsXP或Windows7； 统计软件R2.13.2或更高版本。 三、实验内容 一个正态总体均值的检验（单样本t检验） 两个正态总体均值差的检验（独立样本t检验、配对样本t检验） 两个正态总体方差比的检验（F检验） 非正态总体参数（非参数检验）的检验 第12章 假设检验 12.1 一个正态总体均值的检验 12.2 两个正态总体均值差的检验 12.3 两个正态总体方差比的检验 12.4 非正态总体参数的检验 12.1 一个正态总体均值的检验 【例12.1】(数据文件为li12.1.txt) 包装机包装茶叶的质量服从正态分布，其标准质量为500克。欲检查机器性能是否良好，从一批茶叶中随机抽取10包为样本，测得每包的质量分别为（单位：克）： 500、505、482、480、481、 501、498、482、490、481。 【例4.1】 【统计理论】 当总体方差已知时，可以采用以下Z统计量（即标准正态统计量）来进行检验： 【统计理论】 当总体方差未知时，则采用如下t统计量来进行检验： 【软件操作】 采用t.test( )函数来完成上述假设检验 (1) 这是一个双侧检验问题 ,即 setwd(“D:/R-Statistics/data/chap-12”) #设定工作路径 x=read.table(“li12.1.txt”,header=T) #从li11.1.txt中读入数据，记为x。 (或者：xc(500,505,482,480,481,501,498,482, 490,481) #输入样本数据x) t.test(x,mu=500) #检验总体均值是否等于500 运行结果 One Sample t-test data: x t = -3.1623, df = 9, p-value = 0.01151 alternative hypothesis: true mean is not equal to 500 95 percent confidence interval: 482.8464 497.1536 sample estimates: mean of x 490 运行结果 One Sample t-test data: x t = -3.1623, df = 9, p-value = 0.005754 alternative hypothesis: true mean is less than 500 95 percent confidence interval: -Inf 495.7968 sample estimates: mean of x 490 12.2 两个正态总体均值差的检验 【例12.2】（数据文件为li12.2.txt）某商场欲购买A、B两种牌号的灯泡，B牌号的灯泡的质量比A牌号的灯泡好一些，但价格也贵一些，商场经理希望知道两种牌号的灯泡的平均使用寿命，以便确定A、B两种牌号灯泡的购买量，商场经理还希望知道两种牌号的灯泡的平均使用寿命的差别，以便制定相应的零售价格，现在随机选取A牌号的灯泡8只，B牌号的灯泡10只，测得使用寿命如下（单位：小时）: 【例12.2】 A牌号：950,1000,1100,900,1200,1050,1150,980； B牌号：1200,1350,1450,1100,1500,1000,1400, 1300,1250,1150； 给定显著性水平 ，用 值检验法检验： （1）两种牌号灯泡的平均使用寿命是否相等？ （2）A牌号灯泡平均使用寿命是否比B牌号灯泡平均使用寿命短？ 【统计理论】 当两个总体方差已知时，采用Z统计量（即标准正态统计量）来进行检验: 【统计理论】 当两个总体方差未知但相等时，可以采用如下t统计量来进行检验 【软件操作】 利用R软件的var.test( )函数先检验它们的方差是否相等，然后再采用t.test( )函数检验两个总体的均值是否相等。 (1) 这是双侧检验，即 先检验两个总体的方差是否相等，具体程序如下： x-c(950,1000,110