1 圖形標題的修改
輸入數據：
dose<-c(20,30,40,50,60)
drugA<-c(16,20,27,40,60)
drugB<-c(15,18,25,31,41)
(1) plot(dose,drugA,type="b",col="red",lty=2,pch=2,lwd=2,main="Clinical",sub="This is dose",xlab="dose-xx",ylab="drugA--yy",xlim=c(0,60),ylim=c(0,70))
解釋：col設置線條的顏色，lty設置線條類型，為2意思是虛線，pch=17意思是三角標識，lwd是設置線條的寬度，main設置圖形標題，sub設置子標題，xlab設置橫坐標軸名字，ylab設置軸坐標軸名字，xlim設置橫坐標軸刻度區間，ylim設置縱坐標軸刻度區間
(2) 圖形繪制與標題設置分開
plot(dose,drugA,type="b",col="red",lty=2,pch=2,lwd=2)
title(main="Clinical",sub = "This is dose",col.main="red",col.sub="blue")
2 圖形坐標軸的修改
輸入數據：
x<-c(1:10)
y<-x
z<-10/x
(1)把原始格式參數先保存
opar<-par(no.readonly = T)
(2)坐標軸修改
plot(x,y,type="b",pch=21,col="red",yaxt="n",lty=3,ann=F)
解釋：type設置為折線圖，col設置線條顏色，yaxt設置y軸隱藏（不顯示），lty設置線條類型（點畫線），ann設置其他可能存在的標題為不顯示
lines(x,z,type = "b",pch=22,col="blue",lty=2)
解釋：type設置為折線圖，pch設置線條中間符號的標識，col設置線條顏色，lty設置線條類型（點畫線）
axis(2,at=x,labels=x,col.axis="red",las=2)
解釋：第一個參數：1，2，3，4代表下左上右，2設置左側坐標軸，at=x表示畫的刻度線是x，,labels=x設置標簽為x，col.axis設置坐標軸刻度的顏色，las=2設置坐標軸刻度垂直
axis(4,at=z,labels=round(z,digits=2),col.axis="blue",las=2,cex.axis=0.7,tck=.01)
解釋：4設置右側刻度線，at=z代表畫的是z的刻度線，labels設置標簽對z取兩位小數，col.axis設置坐標軸刻度的顏色，las=2設置坐標軸刻度垂直，cex.axis設置刻度標識大小，tck設置兩位小數點
mtext("y=1/x",side=3,line=3,cex.lab=1,las=1,col="blue")
title("An Example",xlab = "XX",ylab="YY")
解釋：y=1/x函數名，side=3代表在圖形上方顯示函數，line=3，cex.lab是設置坐標軸字體大小，las=設置函數橫向顯示，col設置顏色，title設置主標題和橫縱坐標標題
abline(h=c(1,5,7))
abline(v=seq(1,10,2),lty=2,col="blue")
解釋：abline是畫參考線
(3)恢復原始格式參數
par(opar)