Correction, I forgot the caret: legend(210, 110, bquote(r^2 == .(format(summary(regression)$adj.r.squared,digits=3)))) -- View this message in context: http://r.789695.n4.nabble.com/superscript-tp3252881p3252924.html Sent from the R help mailing list archive at Nabble.com.