###dual ordinate Plot in R ################################### ###par(mar=c(5,4,4,4)) plot(ae3$wait.med,type="l", col=2, ylim=c(0,150)) par(new=T) plot(ae3$wait.N,type="l",axes=F, col=4,ylim=c(0,6500)) axis(side=4) #######################################