R作图_1多曲线正态分布图

x<-seq(-5,5,length.out=10000)#生成-5~5之间等距的10000个数
#共用x，dnorm函数生成四个不同的正态分布
y1<-dnorm(x,0,sqrt(5.0))
y2<-dnorm(x,0,sqrt(1.0))
y3<-dnorm(x,0,sqrt(0.2))
y4<-dnorm(x,-2,sqrt(0.5))
#先画出y1，定义好颜色、大小、坐标轴标签、图像名称、坐标轴最值
plot(x,y1,type="l",col="blue",lwd=2,xlab="x",ylab="F(x)",main="Normal Distributions",xlim = c(-5,5),ylim = c(0,1),axes = F,frame.plot = T)
axis(1,-5:5,labels=-5:5,tck=0)#定义x轴（1）范围、标签
axis(2,seq(0,1,0.2),labels=seq(0,1,0.2),tck=0,las=2)#定义y轴（2）范围、标签
#在已经画好的图上继续添加其他三个曲线，规定好颜色和宽度
lines(x,y2,col="green",lwd=2)
lines(x,y3,col="red",lwd=2)
lines(x,y4,col="purple",lwd=2)
#定义网格参数
abline(h=seq(0.2,0.8,0.2),v=-5:5,col="grey")