第11篇 章参数估计-R 《统计学实验》课件.ppt

《统计学实验》第11章参数估计 * 统计学实验—SPSS和R软件应用与实例 主编：费宇 第11章 参数估计 一、实验目的 运用t.test( )函数进行总体均值的估计 运用prop.test( )函数进行总体比例的估计 读懂R输出的结果 二、实验环境 系统软件Windows2000或WindowsXP或Windows7； 统计软件R2.13.2或更高版本。 三、实验内容 一个正态总体均值的点估计和区间估计 两个正态总体均值差的点估计和区间估计 总体比例的估计 总体比例之差的估计 【统计理论】 当总体方差已知时，可以采用以下由Z统计量（即标准正态统计量）构造的置信区间 【统计理论】 当总体方差未知时，则采用如下t区间 【软件操作】 采用t.test( )函数来进行总体均值的估计 setwd(“D:/R-Statistics/data/chap-11”) #设定工作路径 dat=read.table(li11.1.txt,header=T) #从li11.1.txt中读入数据，记为dat t.test(dat) #计算茶叶质量均值的区间估计 运行结果 One Sample t-test data: dat t = 493.0505, df = 29, p-value 2.2e-16 alternative hypothesis: true mean is not equal to 0 95 percent confidence interval: 197.5239 199.1694 sample estimates: mean of x 198.3467 11.2 两个正态总体均值差的估计 【例11.2】（数据文件为li11.2.txt ）为了比较两个城市成年男子的身高，在A、B两个城市随机抽取了20和22个成年男子，测量得到身高数据如下（单位：厘米） A城市:170,172,178,176,175,180,165,168,171,167, 182, 177,178,175,169,174,173,181,179,184; B城市:172,170,176,178,174,181,164,166,170,172,180, 175,180,172,170,175,172,180,177,178,168,170; 假定身高服从正态分布 假定两个总体方差相等，求两个地区平均身高的差的置信度为95%的置信区间； 假定两个总体方差不等，求两个地区平均身高的差的置信度为95%的置信区间。 【统计理论】 当两个总体方差已知时，采用以下Z区间 【统计理论】 当两个总体方差未知但相等时，可以采用如下t区间 【软件操作】 （1）先考虑两个总体方差相等的情况。 setwd(D:/R-Statistics/data/chap-11) #设定工作路径 dat=read.table(li11.2.txt,header=T) #从li11.2.txt中读入数据，记为dat t.test(height~city,data=dat,var.equal=TRUE,conf.level=0.95) #同方差假定下均值差#的区间估计 运行结果 Two Sample t-test data: height by city t = 0.684, df = 40, p-value = 0.4979 alternative hypothesis: true difference in means is not equal to 0 95 percent confidence interval: -2.079172 4.206445 sample estimates: mean in group 1 mean in group 2 174.7000 173.6364 【软件操作】 （2）再考虑两个总体方差不相等的情况。 t.test(height~city,data=dat,var.equal=FALSE,conf.level=0.95) #异方差假定下均值差的区间估计 运行结果 Welch Two Sample t-test data: height by city t = 0.6807, df = 38.501, p-value = 0.5002 alternative hypothesis: true difference in means is not equal to 0 95 percent confidence interval: -2.098416 4.225689 sample estimates: mean in group 1 mean in group 2 174.7