Paste expression in graph title
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