我在網路上找到語法如下
x <- 1:5
y1 <- rnorm(5)
y2 <- rnorm(5,20)
par(mar=c(5,4,4,5)+.1)
plot(x,y1,type="l",col="red")
par(new=TRUE)
plot(x, y2,,type="l",col="blue",xaxt="n",yaxt="n",xlab="",ylab="")
axis(4)
mtext("y2",side=4,line=3)
legend("topleft",col=c("red","blue"),lty=1,legend=c("y1","y2"))
出處: http://goo.gl/G318eZ
但是當我有第3個y(y3), 其值也想要對照 右邊y軸, 不知道該如何寫?
希望有人可以幫忙解答,謝謝