2.2作图系统

2.2.1图形布局

x<-runif(50,0,2)#生成50个（0，2）区间服从均匀分布的随机数
y<-runif(50,0,2)#同上
plot(x,y,main = "Main title",sub = "subtitle",
     xlab="x-label",ylab="y-label")#绘图添加主标题，副标题，x轴标签，y轴标签

text(0.6,0.6,"text at (0.6,0.6)")#在0.6，0.6处添加文本text at (0.6,0.6)
abline(h=.6,v=.6)#h参数表示在0.6的水平直线，v参数表示在0.6的竖直直线
#函数lines()其作用是在已有图上加线，命令为lines(x,y),其功能相当于plot(x,y,type="1")

for (side in 1:4) mtext(2:5,side=side,at=.7,line = -1:4)
#for循环,side为循环对象，循环体mtext(2:5,side=side,at=.7,line = -4:-1)；line参数控制在边界的具体位置
#当循环体只有一行时，大括号可以省略

mtext(paste("side",1:4),side=1:4,line = -1,font = 2)

函数mtext（需添加的，绘图边界方位，具体坐标，对应位置，字体参数）

2.2.2利用部分构造图形

plot(x,y,type = "n",xlab = "",ylab = "",axes = F)
#绘制完全空白的图形，type=‘n’使点不被绘制，axes=F删掉坐标以及图周围的方框，x和y标题标签设置成空字符串

points(x,y)#添加点

axis(1)#添加横坐标轴

axis(2,at=seq(0.2,1.8,0.2))#添加纵坐标轴，标示0.2到1.8以0.2为步长

box()#添加方框

title(main="Main title",sub="subtitle",
      xlab="x-label",ylab="y-label")#添加主标题，小标题，x和y标题

2.2.3 par的使用

d<-par(mar=c(5,4,4,2)+.1)#mai的默认值,从下端开始逆时针设置
plot(x,y,type="n",xlab="",ylab="",axes=F)
box()

d<-par(mar=c(4,4,2,2)+.1)#修改mai的值
plot(x,y,type = "n",xlab="",ylab="",axes = F)
box()

par具体的使用，后续将会写一篇博客说明

2.2.4组合图形

x<-rnorm(100)#生成100个服从正态分布的随机数
hist(x,freq = F)#freq=F参数保证了直方图是根据比例绘制

hist(x)#根据绝对数值绘制直方图
curve(dnorm(x),add=T)#curve画x变量的密度函数曲线，add=T允许它叠加到已有的图上

h<-hist(x,plot=F)#plot=F将不会画出任何图形，但是返回一个以比例尺度表示的直方图条形高度的结构
ylim<-range(0,h$density,dnorm(0))#range寻找里面参数的最小和最大值，dnorm（0）标准正态在零的密度值
hist(x,freq = F,ylim = ylim)#y值的范围通过ylim（参数）=ylim保证
curve(dnorm(x),add=T)#curve画x变量的密度函数曲线，add=T允许它叠加到已有的图上