Hi Rich and Peter, What I am trying to do is the right-justify a vector of numbers to the right of the y-axis so that the leftmost digit of all of the numbers is one character to the right of the axis line. axis() plots tick marks and left-justifies the numbers.
Peter's idea: --------- Since you're setting your right margin to 5, why not just mtext(s, side=4, las=1, at=5, adj=1, line = 5, cex=1) mtext(s, side=4, las=1, at=7, adj=1, line = 5, cex=2) i.e. set the line argument to the right margin? --------- comes close to what I'm trying to do but I haven't found out how to compute "line" from the maximum width over all the strings in the vector being plotted vertically, and I'm not sure it scales properly for different cex=. strwidth(s, units='inches')/par('cin')[1] doesn't seem to be a complete solution. Thanks Frank Richard M. Heiberger wrote > > Frank, > > this is it. It uses Peter's idea. > > plot(1:10) > axis(side=2, 1:10, las=1, line=-31.5, lwd=0) > axis(side=4, 1:10, las=1, labels=FALSE) > > Rich > > > On Thu, Mar 1, 2012 at 6:52 PM, Frank Harrell <f.harrell@>wrote: > >> Rich's pointers deals with lattice/grid graphics. Does anyone have a >> solution for base graphics? >> Thanks >> Frank >> >> Richard M. Heiberger wrote >> > >> > Frank, >> > >> > This can be done directly with a variant of the panel.axis function. >> > See function panel.axis.right in the HH package. This was provided for >> me >> > by David Winsemius in response to my query on this list in October 2011 >> > https://stat.ethz.ch/pipermail/r-help/2011-October/292806.html >> > >> > The email thread also includes comments by Deepayan Sarkar and Paul >> > Murrell. >> > >> > Rich >> > >> > On Wed, Feb 29, 2012 at 8:48 AM, Frank Harrell <f.harrell@>wrote: >> > >> >> I want to right-justify a vector of numbers in the right margin of a >> >> low-level plot. For this I need to compute the line parameter to give >> to >> >> mtext. Is this the correct scalable calculation? >> >> >> >> par(mar=c(4,3,1,5)); plot(1:20) >> >> s <- 'abcde'; w=strwidth(s, units='inches')/par('cin')[1] >> >> mtext(s, side=4, las=1, at=5, adj=1, line=w-.5, cex=1) >> >> mtext(s, side=4, las=1, at=7, adj=1, line=2*(w-.5), cex=2) >> >> >> >> Thanks >> >> Frank >> >> >> >> ----- >> >> Frank Harrell >> >> Department of Biostatistics, Vanderbilt University >> >> -- >> >> View this message in context: >> >> >> http://r.789695.n4.nabble.com/Computing-line-for-mtext-tp4431554p4431554.html >> >> Sent from the R help mailing list archive at Nabble.com. >> >> >> >> ______________________________________________ >> >> R-help@ mailing list >> >> https://stat.ethz.ch/mailman/listinfo/r-help >> >> PLEASE do read the posting guide >> >> >> http://www.R-project.org/posting-guide.html<http://www.r-project.org/posting-guide.html><http://www.r-project.org/posting-guide.html&lt;http://www.r-project.org/posting-guide.html&gt> >> ; >> >> and provide commented, minimal, self-contained, reproducible code. >> >> >> > >> > [[alternative HTML version deleted]] >> > >> > ______________________________________________ >> > R-help@ mailing list >> > https://stat.ethz.ch/mailman/listinfo/r-help >> > PLEASE do read the posting guide >> > >> http://www.R-project.org/posting-guide.html<http://www.r-project.org/posting-guide.html> >> > and provide commented, minimal, self-contained, reproducible code. >> > >> >> >> ----- >> Frank Harrell >> Department of Biostatistics, Vanderbilt University >> -- >> View this message in context: >> http://r.789695.n4.nabble.com/Computing-line-for-mtext-tp4431554p4436923.html >> Sent from the R help mailing list archive at Nabble.com. >> >> ______________________________________________ >> R-help@ mailing list >> https://stat.ethz.ch/mailman/listinfo/r-help >> PLEASE do read the posting guide >> http://www.R-project.org/posting-guide.html<http://www.r-project.org/posting-guide.html> >> and provide commented, minimal, self-contained, reproducible code. >> > > [[alternative HTML version deleted]] > > ______________________________________________ > R-help@ mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide > http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. > ----- Frank Harrell Department of Biostatistics, Vanderbilt University -- View this message in context: http://r.789695.n4.nabble.com/Computing-line-for-mtext-tp4431554p4439703.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.