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@vanderbilt.edu>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 &lt;f.harrell@&gt;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&lt;http://www.r-project.org/posting-guide.html&gt<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@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<http://www.r-project.org/posting-guide.html>
> and provide commented, minimal, self-contained, reproducible code.
>

	[[alternative HTML version deleted]]

