文档介绍:该【统计学R语言实验5 】是由【布罗奇迹】上传分享,文档一共【20】页,该文档可以免费在线阅读,需要了解更多关于【统计学R语言实验5 】的内容,可以使用淘豆网的站内搜索功能,选择自己适合的文档,以下文字是截取该文章内的部分文字,如需要获得完整电子版,请下载此文档到您的设备,方便您编辑和打印。统计学R语言实验5
实验5R绘图(二)
实验目的:
熟练掌握描述性统计分析中常用的统计量;
掌握R语言的高水平作图命令;
掌握R语言的低水平作图命令;
掌握多元数据的三个数据特征:均值向量、协方差矩阵、相关系数矩阵。
实验内容:
练****br/>要求:①完成练****并粘贴运行截图到文档相应位置(截图方法见下),并将所有自己输入文字的字体颜色设为红色(包括后面的思考及小结),②回答思考题,③简要书写实验小结。④修改本文档名为“本人完整学号姓名1”,其中1表示第1次实验,以后更改为2,3,...。如文件名为“1305543109张立1”,表示学号为1305543109的张立同学的第1次实验,注意文件名中没有空格及任何其它字符。最后连同数据文件、源程序文件
等(如果有的话,本次实验没有),一起压
菌型
存活天数
1
2
4
3
2
4
7
7
2
2
5
4
2
5
6
8
5
10
7
12
12
6
6
3
7
11
6
6
7
9
5
5
10
6
3
10
注:平均存活天数其实应该是均值,但当不知道总体的分布时,通常是比较中位数。因此,这里考虑用箱线图中的中位数来进行比较。
解:源代码:
y<-c(2,4,3,2,4,7,7,2,2,5,4,
5,6,8,5,10,7,12,12,6,6,
7,11,6,6,7,9,5,5,10,6,3,10)
f<-factor(c(rep(1,11),rep(2,10),rep(3,12)))
plot(f,y)
A<-c(2,4,3,2,4,7,7,2,2,5,4)
B<-c(5,6,8,5,10,7,12,12,6,6)
C<-c(7,11,6,6,7,9,5,5,10,6,3,10)
boxplot(A,B,C)
运行截图:
结论:
从箱线图中可以看到,菌型2和3的平均存活天数无显著差异,但是与菌型1的有显著差异
(),。
序号
硬度X1
变形X2
弹性X3
1
65
45
2
70
45
3
70
48
4
69
46
5
66
50
6
67
46
7
68
47
8
72
43
9
66
47
10
68
48
注:。
,()函数存入到数据框中即可,避免输入麻烦。
解:源代码:
>df<-("",header=T)
>df
>pairs(df)
运行截图:
结论:
具有相关关系的两个变量的散点图要么是从左下角到右上角(即正相关关系),要么是从左上角到右下角(即负相关关系)。但从上图可知所有的图中都没有这样的趋势,故均不相关。
()某校测得19名学生的四项指标,性别、年龄、身高(cm)和体重(lb),具体数据如下表所示。
试绘出体重对于身高的散点图;
绘出不同性别情况下,体重与身高的散点图;(coplot(a~b|c))
绘出不同年龄段的体重与身高的散点图;
绘出不同性别和不同年龄段的体重与身高的散点图。(coplot(a~b|c+d))
学号
姓名
性别
年龄
身高
体重
01
Alice
F
13
02
Becka
F
13
03
Gail
F
14
04
Karen
F
12
05
Kathy
F
12
06
Mary
F
15
07
Sandy
F
11
08
Sharon
F
15
09
Tammy
F
14
10
Alfred
M
14
11
Duke
M
14
12
Guido
M
15
13
James
M
12
14
Jeffrey
M
13
15
John
M
12
16
Philip
M
16
17
Robert
M
12
18
Thomas
M
11
19
William
M
15
解:源代码:
>ef<-((),header=T);ef
>attach(ef)
>plot(体重~身高)
>coplot(体重~身高|性别)
>coplot(体重~身高|年龄)
>coplot(体重~身高|年龄+性别)
运行截图: