Message-ID: <4B5D8B37.2080404@erasmusmc.nl>
Date: 2010-01-25T12:14:47Z
From: Dimitris Rizopoulos
Subject: Paste expression in graph title
In-Reply-To: <1264421182890-1289272.post@n4.nabble.com>
Have a look at the help page for ?plotmath, and try also this:
x <- rnorm(10)
y <- rnorm(10)
R2 <- round(summary(lm(y ~ x))$r.squared, 3)
plot(x, y, main = bquote(R^2 == .(R2)))
I hope it helps.
Best,
Dimitris
Paul Chatfield 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
--
Dimitris Rizopoulos
Assistant Professor
Department of Biostatistics
Erasmus University Medical Center
Address: PO Box 2040, 3000 CA Rotterdam, the Netherlands
Tel: +31/(0)10/7043478
Fax: +31/(0)10/7043014