Message-ID: <971536df1001250418t51b5de86lfc801a0caa815af3@mail.gmail.com>
Date: 2010-01-25T12:18:08Z
From: Gabor Grothendieck
Subject: Paste expression in graph title
In-Reply-To: <1264421182890-1289272.post@n4.nabble.com>
Try bquote:
set.seed(123)
x<-rnorm(10)
y<-rnorm(10)
R2 <- summary(lm(y ~ x))$r.squared
R2round <- round(R2, digits = 3)
plot(x, y, main = bquote(R^2 == .(R2round)))
On Mon, Jan 25, 2010 at 7:06 AM, Paul Chatfield
<p.s.chatfield at reading.ac.uk> wrote:
>
> This was my initial attempt at creating a title on a graph of the R squared
> value:
>
> x<-rnorm(10)
> y<-rnorm(10)
> plot(x,y, main=paste(expression(R^2)," = ",round(summary(lm(y~
> x))$r.squared, digits=3), sep=""))
>
> I've read various other posts that say expression needs to be taken outside
> the paste, but I can't seem to get it work as the following fails
>
> plot(x,y, main=expression(paste("R^2"," = ",round(summary(lm(y~
> x))$r.squared, digits=3), sep="")))
>
> I tried it with title() and didn't get much further either.
>
> Hmmm, any ideas what am I missing?
>
> Thanks
>
> Paul
> --
> View this message in context: http://n4.nabble.com/Paste-expression-in-graph-title-tp1289272p1289272.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> 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.
>