R语言第九周作业

实验九数据可视化（绘图一）

实验目的：

1.熟悉R中绘图工作的环境

2.熟悉R中的绘图函数plot的使用

3.熟悉plot图形的相关参数设置

实验要求：完成每个实验内容的同时，在每题后面附上程序代码。要求独立完成。

实验内容：

1.绘制参数lambda分别为1,2,3,4的指数分布密度函数图像于同一个坐标系下，设置不同的颜色线条，并设置图例。

x<-seq(0,5,0.1)

y<-dexp(x,rate=1)

plot(x,y,type="l",col=1)

y<-dexp(x,rate=2)

lines(x,y,col=2)

y<-dexp(x,rate=3)

lines(x,y,col=3)

y<-dexp(x,rate=4)

lines(x,y,col=4)

legend(4,1,c("rate=1","rate=2","rate=3","rate=4"),lty=c(1,1,1,1),col=c(1,2,3,4))

2.对score.csv数据，绘制语文成绩和数学成绩散点图，不同性别的点用不同的形状和颜色，并设置图例。

score<-read.csv("score.csv",header=T)

with(score,plot(chinese,math,type="p",col=as.integer(sex),pch=as.integer(sex))) legend(90,90,c("f","m"),pch=c(1,2),col=c(1,2))

3. 对score.csv数据，绘制语文成绩和英语成绩散点图，不同班级的点用不同的形状和颜色，并设置图例。

score<-read.csv("score.csv",header=T)

with(score,plot(chinese,english,col=as.integer(class),pch=as.integer(class))) legend(90,90,c("class 1","class 2"),pch=c(1,2),col=c(1,2))