Message-ID: <Pine.A41.4.61b.0411110917570.195158@homer04.u.washington.edu>
Date: 2004-11-11T17:26:06Z
From: Thomas Lumley
Subject: expressions and paste
In-Reply-To: <419393CE.31353.1A1A01C@localhost>
On Thu, 11 Nov 2004, Emily Baldock wrote:
> I have written a function to plot data which will be used for various different chemistries.
> A simplified version is:
> plot_data <- function(risk,levels,chem,sd2,measure){
> plot(risk, levels,main=paste ("per", sd2, measure, "\n in usual", chem))
> }
> The problem is with the title.
> This works fine if the variable "chem" is just text, but if it is an expression then obviously it won't work.
> I have experimented with various things and I am at a complete loss for how to insert an expression into the middle of
> a title.
With
sd2<-10
measure<-quote(mu*g*m^{-3})
chem<-quote(H[2]*SO[4])
You can use
plot(1,1,main=bquote("per "*.(sd2)*.(measure)*" in usual "*.(chem)))
or
plot(1,1,main=substitute("per "*sd2*measure*" in usual "*chem,
list(sd2=sd2,measure=measure,chem=chem)) )
You don't get the newlines, someone else will have to work this out.
-thomas