How about:
par(mfrow=c(2,2))
for (i in c(30,50,70,90)) {
plot(0, 0, type="n")
mtext(substitute( RH[925-500] == ii,
list(ii=paste(i,"%",sep=""))))
}
-Greg
> -----Original Message-----
> From: John Bjornar Bremnes [mailto:J.B.Bremnes at met.no]
> Sent: Wednesday, October 30, 2002 11:15 AM
> To: r-help at stat.math.ethz.ch
> Subject: [R] plotmath
>
>
> How can I add "%" to each titlein the example below?I am
> using R1.5.0
> on Linux.
>
> par(mfrow=c(2,2))
> for (i in c(30,50,70,90)) {
> plot(0, 0, type="n")
> mtext(substitute(RH[925-500] == ii, list(ii=i)))
> }
>
>
> thanks
> --
> John Bjornar Bremnes
> Norwegian Meteorological Institute (met.no)
> Research and Development Department
> P.O.Box 43 Blindern, N-0313 Oslo, Norway
> Phone: (+47) 2296 3326. Fax: (+47) 2269 6355
> -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.
> -.-.-.-.-.-.-.-.-
> r-help mailing list -- Read
> http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
> Send "info", "help", or "[un]subscribe"
> (in the "body", not the subject !) To:
> r-help-request at stat.math.ethz.ch
> _._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._.
> _._._._._._._._._
>
LEGAL NOTICE
Unless expressly stated otherwise, this message is confidential and may be
privileged. It is intended for the addressee(s) only. Access to this E-mail by
anyone else is unauthorized. If you are not an addressee, any disclosure or
copying of the contents of this E-mail or any action taken (or not taken) in
reliance on it is unauthorized and may be unlawful. If you are not an addressee,
please inform the sender immediately.
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !) To: r-help-request at
stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._