画图的时候先把最初的各个画图的格式存起来，
画完一种类型的图 再还原回去
这样画别的图就不会影响了
opar<-par(no.readonly=TRUE)
然后改格式。。
画图。。。
最后：
par(opar)
plot 二维坐标绘图
dotchart 点图
barplot 条形图
hist 直方图
pie 饼图
points 添加点
lines 添加线
text 添加文字
title 添加标题
boxplot 箱线图
##画图
plot(x~y,xlab="",ylab="",main="",xlim=c(0,45),ylim=c(0,45),pch=18,col=2,cex=5)
#xlab/ylab，xy标题
#main，主标题
#xlim,ylim，xy线段范围
#pch，点的类型（圆形、棱形等）
#col，线条的颜色
#cex，点的大小
#预先在数据框中分块,2*2分块
par(mfrow=c(2,2),mar=c(3,3,2,1))
par(del) #画好需要关闭
legend(x,y,fill=v,col=v,lty=v, lwd=v,pch=v) 在当前图的特定位置增加图例（legend）。
#legend( , fill=v)填充盒子的颜色
#legend( , col=v)点或者线条的颜色
#legend( , lty=v)线条样式
#legend( , lwd=v)线条宽度
#legend( , pch=v)标识字符(字符向量)
pch：指定绘制点所使用的符号，取值范围[0, 24]，其中4是“差号”，20是“点”
cex：指定符号的大小。cex是一个数值，表示pch的倍数，默认是1.5倍
lty：指定线条类型。lty=1代表实线，2至6都是虚线，虚的程度不一样
lwd：指定线条宽度，默认值为lwd=1，可以适当修改1.5倍、2倍等
col：默认绘图颜色。某些函数(如lines、pie)可以接受一个含有颜色值的向量，并自动循环使用。
例如：col=c("red", "blue")需要绘制三条线，那么三条颜色分别为red、blue、red
col.axis：坐标轴刻度文字的颜色，不是坐标轴的颜色
col.lab：坐标轴标签(名称)的颜色
col.main：标题的颜色
col.sub：副标题的颜色
fg：图形的前景色
bg：图形的背景色
cex.axis：坐标轴刻度文字的缩放倍数
cex.lab：坐标轴标签(名称)的缩放倍数
cex.main：标题的缩放倍数
cex.sub：副标题的缩放倍数
font：整数。用于指定字体样式。1常规、2粗体、3斜体、4粗斜体
pin：以英寸表示图形的宽和高
mai：以数值向量表示边界大小，顺序为"下、左、上、右"，单位为英寸
mar：以数值向量表示边界大小，顺序为"下、左、上、右"，单位为英分，默认值c(5, 4, 4, 2)+0.1
标题title，格式为：
title(main = " ", sub = " ", xlab = " ", ylab = " ")
坐标轴
axes=FALSE 将禁用全部坐标轴，框架和刻度全部没有了
xaxt="n" 禁用x轴的刻度线
yaxt="n" 禁用y轴的刻度线
xlim x坐标轴的范围，只写出最小值和最大值
ylim y坐标轴的范围，只写出最小值和最大值
at：一个数值向量，表示需要绘制刻度线的位置
labels：一个字符型向量(也可以是数值型)，表示刻度线旁边的文字标签(刻度值)，如果整个不写，则直接使用at的值
col：线条和刻度的颜色
lty：线条类型
las：标签的字体是否平行(=0)或者垂直(=2)坐标轴
tck：刻度线的长度(默认值-0.01，负值表示刻度在图形外，正值表示刻度在图形内侧)
参考线
abline(h=yvalues, v=xvalues)
abline(h = c(1, 5)) #则在y=1和5处各有一条水平线
abline(v = c(1, 5)) #则在x=1和5处各有一条垂直线
图例
legend(location, title, legend, ……)
