[R] Paste expression in graph title

[Gabor Grothendieck]

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.
>