1.par(mar=c(8,5.2,8,5.2))
par(mar = c(4, 4, 0.5, 0.5)) #设定下边距和左边距为4行，另外两边距为0.5行。(下，左、上、右)
2、plot(b[,4],xaxt=‘n‘,ylim=c(0,3),yaxt=‘n‘,lwd=2,xlab="",cex.lab=3,ylab="",col="white",yaxs="i",xaxs="i")
xaxt和yaxt决定是否画坐标轴的刻度线和刻度线标签。xaxt = ‘n’时，不画坐标轴x的刻度线和刻度线标签；yaxt = ‘n’时，不画坐标轴y的刻度线和刻度线标签。
3、axis(1,at=a,labels=F,cex.axis=2,mgp=c(3,1,0))