You need to have enough room in that margin, so you probably need to set the "mar" graphics parameter. For example:
par(mar=c(5,4,4,4) +.1)
You then want to use "mtext", like:
mtext(side=4, line=2, "the other ylab")
Patrick Burns
Burns Statistics [EMAIL PROTECTED] +44 (0)20 8525 0696 http://www.burns-stat.com (home of S Poetry and "A Guide for the Unwilling S User")
Jan Verbesselt wrote:
Hi weekend R helpers,
*Is it possible to get a ylabel on the right hand side axis ==> axis(4)?
Thankx, Jan
opar <- par(mfrow = c(2,1)) plot(ts.Origi[,1],ylab='NDII', main=name) # Add the legend text in the right order legend.txt <- c("NDII", "Inverse KBDI") legend(2001.8,0.29, legend.txt,col=c(1,2), lty=1) par(new=T) plot(ts.Origi[,2], yaxt="n", type="l", col=2, las=1, ylab="") axis(4)
plot(ts.NDVIKB[,1],ylab='NDVI', main=name) # Add the legend text in the right order legend.txt <- c("NDVI", "Inverse KBDI") legend(2001.8,0.42, legend.txt,col=c(1,2), lty=1) par(new=T) plot(ts.NDVIKB[,2], yaxt="n", type="l", col=2, las=1, ylab="") axis(4)
______________________________________________ [EMAIL PROTECTED] mailing list https://www.stat.math.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
______________________________________________ [EMAIL PROTECTED] mailing list https://www.stat.math.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
