远山的红叶主题曲
第一次作业：
请各位同学用如下格式提交作业：
题目一：
题目：2006年四川省5个县奶牛的增长率(与2005年相比)如下，绘制成长条图。 | 双流县 | 名山县 | 宣汉县 | 青川县 | 泸定县 |
增长率（%） | 22.6 | 13.8 | 18.2 | 31.3 | 9.5 |
| | | | | |
解：
代码：x<-c(22.6,13.8,18.2,31.3,9.5)
barplot(x,col=rainbow(5), ylab='增长率%' ,xlab='县名',main='2005~2006四川省5个县奶牛的增长率',names.arg=c('双流县','名山县','宣汉县','青川县','泸定县'))
图片：
题目二：
题目：1~9周龄大型肉鸭杂交组合GW和GY的料肉比如下表所示，绘制成线图。
周龄 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 |
GW | 1.42 | 1.56 | 1.66 | 1.84 | 2.13 | 中国青年运动的时代主题2.48 | 2.83 | 3.11 | 3.48 |
GY | 1.47 | 1.71 | 1.80 | 1.97 | 2.31 | 2.91 | 3.02 | 3.29 | 3.57 |
| | | | | | | | | |
解：
代码：x<-1:9
y<-c(1.42,1.56,1.66,1.84,2.13,2.48,2.83,3.11,3.48)
plot(y~x,type="l",col="red",ylab='料肉比',xlab='周龄',main='1~9周龄大型肉鸭杂交组合GW和GY的料肉比')石像
z<-c(1.47,1.71,1.80,1.97,2.31,2.91,3.02,3.29,3.57)
lines(z~x,type="l",col="blue")
legend(1,3.0,'GW-red')
legend(1,3.25,'GY-blue')
图片：
题目三：附加题
set.seed(学号后8位)
data <- rnorm(100, 10.5, 1.0)
平均数：10.62118
标准差：1.076999
变异系数：0.1014011
2. 选择合适的统计图，展示数据data的总体分布情况 作图软件：R
统计图：（请将做好的统计图粘贴到此处）
代码：（若使用R，或SAS，请将代码粘贴到此处，若使用的软件不需代码则可忽略此部分）
set.seed(20020125)
data<-rnorm(100,10.5,1.0)
data
plot(data,type="p",ylab='体重',xlab='100头猪标号',main='某场猪一月龄体重记录')
结果解释：（100字以内解释该统计图中看到的结果）
由统计图可知，该场猪一月龄体重主要介于8~14kg之间，但在该区间内，猪的体重数据分布较分散，相对来说数据较为集中的区域为10~11kg。这100头猪中，体重最轻的大约为8.0g，体重最重的大约为13.3g。
第二次作业：kinect运动
请各位同学用如下格式提交作业：
题目一：
题目：已知随机变量μ服从N（0,1），求P(μ<-1.4),P(μ≥1.49），
P（|μ|≥2.58），P（-1.21≤μ<0.45），并作图示意。
题解：
P(μ<-1.4)= 0.08075666
P(μ≥1.49)= 0.06811212
P(|μ|≥2.58）=0.009880032
P(-1.21≤μ<0.45）=0.5605053
> pnorm(-1.4,0,1)
[1] 0.08075666
> 1-pnorm(1.49)
[1] 0.06811212
> 2*pnorm(-2.58)
[1] 0.009880032
> pnorm(0.45)-pnorm(-1.21)
蛋白质序列
[1] 0.5605053
题目二：
题目： 猪血红蛋白含量x服从正态分布N（12.86,1.332），
（1）求猪血红蛋白含量x在11.53~14.19范围内的概率；
（2）若P（x<l1）=0.025，P（x>l2）=0.025,求l1，l2
题解：
(1)P(11.53≤x<14.19)= 0.6826895
>pnorm(14.19,12.86,1.33)-pnorm(11.53,12.86,1.33)
>遭遇昨天
豫公网安备41160202000603
站长QQ:729038198
关于我们
投诉建议