Hi Albart,
This bugged me also for quite some time. After some experiments the
following syntax worked best:
library(lattice)
a = 0.11
xyplot(1:10~10:11, xlab = as.expression(bquote(R^2~" equals "~.(a))))
With the combination of as.expression and bquote you can mix text, math
expression and the content of objects (in the case here of a). Read the
documentation of bquote for more details.
cheers,
Paul
Coster, Albart wrote:> Dear list,
>
> making mathematical expressions in plots is not difficult:
expression(phi[1]) for example. At this moment I am stuck in creating a vector
of expressions:
>
> pos <- 1:10
> lab <- letters[pos]
>
> Now, I would like to create a vector of expressions which I could use for
labeling the x-axis of a lattice plot.
>
> ll <- as.expression(paste(pos," phi[",lab,"]",sep =
"")
>
> xyplot(1:10~11:10,scales = list(x = list(labels = ll,at = 1:10)))
>
> does not work. I read about the function substitute, but that did not solve
it.
>
> Could you recommend me how I should do this?
>
> Thanks in advance,
>
> Albart Coster
>
> Wageningen Universiteit
> Netherlands
>
> ______________________________________________
> R-help at 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.
>
--
Drs. Paul Hiemstra
Department of Physical Geography
Faculty of Geosciences
University of Utrecht
Heidelberglaan 2
P.O. Box 80.115
3508 TC Utrecht
Phone: +3130 274 3113 Mon-Tue
Phone: +3130 253 5773 Wed-Fri
http://intamap.geo.uu.nl/~paul