统计学实验SPSS和R软件应用与实例教全套课件（完整）.ppt

* 《统计学实验》第12章假设检验 【软件操作】 对于二项分布参数p的检验，样本量比较小的情况下，一般采用binom.test( )函数来完成；样本量比较大，可以采用prop.test( )函数完成原假设的近似检验。 （1）这是一个左侧检验，采用prop.test( )完成近似检验，R程序如下： prop.test(27,100,p=0.3,alternative=less,correct=TRUE) #选项“correct=TRUE”表示做连续型校正，如果选项为“correct=FALSE”则表示不做连续型校正。 * 《统计学实验》第12章假设检验 运行结果 1-sample proportions test with continuity correction data: 27 out of 100, null probability 0.3 X-squared = 0.2976, df = 1, p-value = 0.2927 alternative hypothesis: true p is less than 0.3 95 percent confidence interval: 0.0000000 0.3536403 sample estimates: p 0.27 【结果分析】 p-value = 0.29270.05，所以不拒绝原假设，认为该综艺节目的收视率与电视台声称的30%没有显著不足； 此外，因为总体比例 的置信度为95%的置信区间为[0，0.3536403]，它包含0.3，也可以判断不能拒绝原假设。 * 《统计学实验》第12章假设检验 * 《统计学实验》第12章假设检验 【软件操作】 （2）这是一个左侧检验，注意到n=1000，R程序如下： prop.test(270,1000,p=0.3,alternative=less,correct=TRUE) #选项“correct=TRUE”表示做连续型校正。 * 《统计学实验》第12章假设检验 运行结果 1-sample proportions test with continuity correction data: 270 out of 1000, null probability 0.3 X-squared = 4.144, df = 1, p-value = 0.02089 alternative hypothesis: true p is less than 0.3 95 percent confidence interval: 0.0000000 0.2942023 sample estimates: p 0.27 【结果分析】 p-value = 0.020890.05，所以拒绝原假设，认为该综艺节目的收视率与电视台声称的30%有显著不足； 此外，因为总体比例 的置信度为95%的置信区间为[0，0.2942023]，它不包含0.3，也可以判断应该拒绝原假设。 * 《统计学实验》第12章假设检验 * 《统计学实验》第12章假设检验 11.3 总体比例的估计 【例11.3】在一个大城市随机调查了1000人，有822人认为该城市的住房价格高， 试估计该城市认为住房价格高的人的比例的置信区间（置信度为95%）。 注 1 ： 如果已经有文本格式的样本数据文件li12.6.txt储存在“D:\R-Statistics\data\chap-12”中： setwd(D:/R-Statistics/data/chap-12) dat=read.table(li12.6.txt,header=T) prop.test(dat$f1[dat$X==1],100,p=0.3,alternative=less,correct=TRUE) #总体比例的检验,n=100 prop.test(dat$f2[dat$X==1],1000,p=0.3,alternative=less,correct=TRUE) #总体比例的检验,n=1000 运行结果为与前面类似（略） * 《统计学实验》第12章假设检验 * 《统计学实验》第12章假设检验 【软件操作】 采用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,4