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
當出現以上錯誤時，把右側的畫圖框拉大即可解決