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
______________________________________________
R-help@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.
