[R] labels on axis(4) and adaptation of legend to size of the plot

Patrick Burns pburns at pburns.seanet.com
Sat Mar 20 15:55:12 CET 2004


Two tricks to know:

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
patrick at burns-stat.com
+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)
>
>______________________________________________
>R-help at stat.math.ethz.ch 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
>
>
>  
>




More information about the R-help mailing list