1 图形的图例
输入数据：
dose<-c(20,30,40,50,60)
drugA<-c(16,20,27,40,60)
drugB<-c(15,18,25,31,41)
par(lwd=2,cex=1,font.lab=2)
解释：全局图形设置，lwd是设置线条的宽度（粗细），cex设置字体的大小，font.lab设置字体样式
plot(dose,drugA,type="b",pch=15,lty=1,col="red",main="Drug A vs. Drug B",xlab="Drug Dosage",ylab="Drug Response")
解释：type="b"设置为折线图，pch=15设置线符号标记为实心矩形，lty=1设置为实线，col="red"线条颜色设置为红色，main设置标题，xlab设置横坐标轴标题，ylab设置轴坐标轴标题
lines(dose,drugB,type="b",pch=17,lty=2,col="blue")
解释：lines为增加一条线，type="b"设置为折线图，pch=17设置线符号标记为三角形，lty=2设置为虚线，col="blue"线条颜色设置为蓝色
abline(h=c(30),col="gray",lwd=1.5,lty=2)
解释：abline增加参考线，col="gray"颜色设置为灰色，lwd是设置线条的宽度（粗细），lty=2设置为虚线
legend("topleft",inset=.05,title="Drug Type",c("A","B"),lty=c(1,2),pch=c(15,17),col=c("red","blue"))
解释：legend设置图例，topleft图例设置在左上方，inset=.05图例在边界0.05的地方，title设置图例的标题，c("A","B")设置图例中标志的名字，,lty=c(1,2)设置图例一个实线，一个虚线，pch=c(15,17)设置线中的符号标识一个是矩形，一个是三角形，col=c("red","blue")设置图例中的颜色
2 图形文本的标注
（1）选取数据集，确定数据集
dat<-mtcars
attach(mtcars)
（2）画图
plot(wt,mpg,main="VS",xlab = "weight",ylab = "mileage",pch=18,col="blue")
解释：xlab设置横坐标轴名字，ylab设置纵坐标轴名字，pch设置线中点的标识，col设置颜色
（3）文本标注
text(wt,mpg,row.names(mtcars),cex=0.6,pos=4,col="red")
解释：text文本标注，row.names标注的名字，cex设置字体大小，pos设置字体距离点的位置，col设置字体颜色
3 图形的组合
3.1 par(mfrow())的用法
mfrow()可以指定画布有几行几列
（1）确定数据集
attach(mtcars)
（2）保存初始设置
opar<-par(no.readonly = T)
（3）操作
par(mfrow=c(2,2)) #设置有2行2列共四个画布
plot(wt,mpg,main="P1") #散点图
plot(wt,disp,main="P2") #散点图
hist(wt,main="P3") #直方图
boxplot(wt,main="P4") #箱线图
（4）恢复默认设置
par(opar)
detach(mtcars)
3.2 layout(matrix())的用法
layout()图的布局问题，更加细致
（1）确定数据集
attach(mtcars)
（2）保存初始设置
opar<-par(no.readonly = T)
（3）操作
layout(matrix(c(1,1,2,3),2,2,byrow = T))
解释：matrix(c(1,1,2,3)代表第1个区域放第1张图，第2个区域放第1张图，第3个区域放第2张图，第4个区域放第3张图，2,2把画布分成了2行2列共4个区域部分，,byrow = T表示按行填充
hist(wt)
hist(mpg)
hist(disp)
（4）恢复默认设置
par(opar)
detach(mtcars)
3.3 par(fig())的用法
fig()可以指定在哪里绘图
（1）确定数据集
attach(mtcars)
（2）保存初始设置
opar<-par(no.readonly = T)
（3）操作
par(fig=c(0,0.8,0,0.8))
解释：0,0.8第一个参数0到0.8表示横轴占80%，0,0.8第二个参数0到0.8表示纵轴占80%
plot(wt,mpg)
解释：plot画散点图
par(fig=c(0,0.8,0.55,1),new=T)
解释：0,0.8第一参数0到0.8表示横轴占80%，0.55,1第二个参数表示纵轴占45%，new=T设置该图在上一个图的基础上画图
boxplot(wt,horizontal = T,axes=F)
解释：boxplot画箱线图，horizontal= T设置箱线图为横着，axes=F设置图形不需要边框
par(fig=c(0.65,1,0.55,1),new=T)
解释：0.65,1第一个参数横轴占比从65%到1，0.55,1第二个参数纵轴占比55%到1，new=T设置在原图上添加图片
boxplot(mpg,axes=F)
解释：boxplot箱线图，axes=F设置不需要边框
par(fig=c(0.65,1,0,0.8),new=T)
解释：0.65,1第一个参数横轴占比从65%到1，0,0.80到0.8表示纵轴占80%
boxplot(mpg,axes=F)
解释：boxplot箱线图，axes=F设置不需要边框
（4）恢复默认设置
par(opar)
detach(mtcars)
错误提示：Error in plot.new() : figure margins too large
当出现以上错误时，把右侧的画图框拉大即可解决