dose <- c(20,30,40,45,60)
dragA <- c(16,20,27,40,60)
dragB <- c(15,18,25,31,40)
plot(dose,dragA,type="b")
plot(dose,dragB,type="b")
opar <- par(no.readonly = TRUE)
par(lty=2, pch=17)
plot(dose,dragA, type = "b")
plot(dose, dragA, type="b", lty=2,pch=19)
plot(dose, dragA, type = "b", lty=6, lwd=2, pch=11,cex=3, col="blue")
plot(dose, dragA, type = "b", lty=6, lwd=2, pch=11,cex=3, col="blue",col.axis="red")
plot(dose, dragA, type = "b", lty=6, lwd=2, pch=11,cex=3, col="blue",col.axis="red",col.lab="green")
一些畫圖參數描述: