R语言第十周作业.docx

文档介绍：⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯最新 料推荐⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯
实验十数据可视化（绘图二）
实验目的：
R 条形图的制作
R 直方图的制作
Q-Q 图来检验分布的特征
R 实现
实验要求：完成每个实验内容的同时， 在每题后面附上程序代码。 要求独立完成。
实验内容：
一．
iris 数据，用每类花（ iris$Speciees）的样本数作为高度，制作条形图。
heights<- table(iris$Species)
barplot(heights)
、、、 的平均值分别制作条形图，四图同显。
par(mfrow=c(2,2))
1
⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯最新 料推荐⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯⋯
attach(iris)
SLength<- tapply(, Species, mean)
barplot(SLength,main="Mean ",col=1)
SWidth<- tapply(, Species, mean)
barplot(SWidth,main="Mean ",col=2)
PLength<- tapply(, Species, mean)
barplot(PLength,main="Mean ",col=3)
PWidth<- tapply(, Species, mean)
barplot(PWidth,main="Mean ",col=4)
、、、 的直方图（用密度值做代表，设置 prob=T）,添加拟合的密度曲线，四图同显。
par(mfrow=c(2,2))
attach(iris)
hist(,prob=T,col=5)
lines(density