Skip to content

complex expression with plotmath

3 messages · Gabor Grothendieck, Felipe Csaszar

Original
Felipe Csaszar
# 
Hello everyone,

I want to define a function that receives the name of two variables
(may include Greek letters and subscripts) and uses them into the
title of a plot.

My best attempt is the following:
myplot <- function(var1, var2) {
    v=paste(var1,"==1 & ",var2,"==2");
    plot(1:10, main=parse(,,v))
}

But when I call it with something like myplot("Q[i]", "Delta[j]") I
get "&(Q_i=1,Delta_j=2)" as title when I want to get "Q_i=1 &
Delta_j=2".

Is there any solution within R? (I don't want to use psfrag and Latex
to post-process the plot)

Why R does not have support for full Latex expressions? (as Matlab
f.ex.). IMHO plotmath is not good enough.

Thank you all.

Felipe
Gabor Grothendieck
#
On 8/14/05, Felipe Csaszar <fcsaszar at gmail.com> wrote:
Try this:


myplot <- function(var1, var2) 
	plot(1:10, main = bquote(.(var1) == 1 ~ "&" ~ .(var2) == 2))
myplot(quote(Q[i]), quote(Delta[j]))
Felipe Csaszar
# 
Thanks, it worked!

So the cute trick was the call to *quote* inside the function call.

Thanks again,

Felipe
On 8/14/05, Gabor Grothendieck <ggrothendieck at gmail.com> wrote: