统计学实验-SPSS和R软件应用与实例第16章抽样调查理论与方法-R.pptVIP

《统计学实验》第16章抽样调查理论与方法*《统计学实验》第16章抽样调查理论与方法16-*统计学实验

—SPSS和R软件应用与实例*《统计学实验》第16章抽样调查理论与方法16-*第16章抽样调查理论与方法*《统计学实验》第16章抽样调查理论与方法16-*一、实验目的熟悉R软件的抽样调查扩展程序包samplingpakage中各种常用的抽样方法，用srswr()函数作简单随机抽样，strata()函数作分层抽样，UPsystematic()函数作系统抽样，cluster()函数作整群抽样。掌握运用R进行抽样的基本操作过程，并能读懂R输出的结果。*《统计学实验》第16章抽样调查理论与方法16-*二、实验环境1、系统软件Windows2000或WindowsXP或Windows7；2、统计软件R2.14.0或更高版本(sampling程序包的运行环境的最低要求是R2.14.0版本)。*《统计学实验》第16章抽样调查理论与方法16-*三、实验内容简单随机抽样调查方法分层随机抽样调查方法等距抽样调查方法整群抽样调查方法*《统计学实验》第16章抽样调查理论与方法16-*注意：本章例题中使用的数据太长，具体数据文件参见附录。本章使用的各种抽样函数均不是R软件的默认安装函数，需要从R官网(/mirrors/CRAN/)中下载“sampling”和“lpSolve”两个zip格式的安装程序包(package)，解压缩后放在R软件安装目录下的“library”文件夹中。在R的主窗口下用library(sampling)和library(lpSolve)语句调入程序包，这样就可以在R中里使用sampling程序包中的各种常用的抽样函数。*《统计学实验》第16章抽样调查理论与方法16-*第16章抽样调查理论与方法16.1简单随机抽样调查方法16.2分层抽样调查方法16.3等距抽样调查方法16.4总体比例之差的估计*《统计学实验》第16章抽样调查理论与方法16-*16.1简单随机抽样调查方法【例16.1】(数据文件为li16.1.txt)某大学会计学院为了解学生月平均基本生活水平的基本情况，准备用简单随机抽样方法从全学院个学生中抽选一个的学生组成的样本进行调查。*《统计学实验》第16章抽样调查理论与方法16-*【统计理论】简单随机抽样（Simplerandomsampling）是对于一个大小为N的总体，抽取一个容量为n的样本，对于全部可能的样本每一个被抽中的概率都相等。简单随机抽样也称为纯随机抽样，所得样本称为简单随机样本。*《统计学实验》第16章抽样调查理论与方法16-*【统计理论】抽取单元的具体方法有重复抽样和不重复抽样。如果抽样是不放回的，则称为不重复简单随机抽样，此时全部可能样本总数为；如果抽样是放回的，则称为重复简单随机抽样，此时全部可能样本总数为。简单随机重复抽样的误差公式为：*《统计学实验》第16章抽样调查理论与方法16-*【软件操作】用Sampling程序包里的srswr()函数作简单随机抽样library(sampling)#调入sampling程序包library(lpSolve)#调入lpSolve程序包setwd(D:/R-Statistics/data/chap-16)#设定工作路径x=read.table(“li16.1.txt”,header=T)#从li16.1.txt中读入样本数据xnumber=x$XH#读取学生的学号name=x$XM#读取学生的姓名n=100#抽选样本的样本容量N=length(number)#总体容量r=srswor(n,N)#抽取样本，返回只有0和1的向量，用1标记选中的样本as.vector(name[r==1])#列出选中的学生的姓名*《统计学实验》第16章抽样调查理论与方法16-*运行结果运行结束后随机抽取的100名学生为[1]李静罗坤琼浦黎马倩马志颖韩佳张汉芸邹易[9]李