《抽样调查实验》Word文档
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
实验(实训)报告
项目名称 R语言初步
所属课程名称抽样调查
项目类型综合性实验
实验(实训)日期 2013年 4月 1日
班级
学号
姓名
指导教师
浙江财经学院教务处制
实验名称: R语言初步
实验目的: 熟悉R语言
实验要求:会以下操作:
1.安装R并导入程序包
2.查询函数帮助
3.数据读取和t检验
4.方差分析和箱线图绘制
5.下标和条件筛选
6.了解工作路径
7.R脚本运行
8.绘图练习
9.编写函数
作业: 画出三大抽样分布2 分布、t分布、F分布的概率密度函数,并比较参数不同时,概率密度函数的不同形态。
作业说明:作业用word 编辑,以唯一附件的方式上传。作业中要包含程序及图形。
实验过程: 1.2χ分布
2.t分布
概率密度函数(p.d.f.):
2
1
2
1
)
2
(
)
2
1
(
)(
+
-
⎪⎪
⎭
⎫
⎝
⎛
+
Γ
+
Γ
=
n
n
t
n
n
n
t
f
π
+∞
<
<
∞
-t
程序
> x<-c(-4,4)
> y<-c(0,0.4)
> par(lwd=2)
> plot(function(x) dnorm(x,0,1), xlim=x, ylim = y, col=hsv(0),xlab="n",ylab="density of t(n)",lty=2,main="Central t - Density")
> plot(function(x) dt(x, df = 20),xlim=x, ylim = y, col=hsv(0.2),add=TRUE)
> plot(function(x) dt(x, df = 10),xlim=x, ylim = y, yaxs="i",col=hsv(0.4),add=TRUE)
> plot(function(x) dt(x, df = 5),xlim=x, ylim = y, col=hsv(0.6),add=TRUE) > plot(function(x) dt(x, df = 2),xlim=x, ylim = y, col=hsv(0.8),add=TRUE)
>
legend("topright",c("N(0,1)","t(20)","t(10)","t(5)","t(2)"),col=hsv(s eq(0,1,0.2)),
bty="n",cex=1.2,pch=15)
> abline(v=0)
p.d.f.图像
3.F分布
(注:素材和资料部分来自网络,供参考。请预览后才下载,期待你的好评与关注!)