what about
legend("topleft",
legend = bquote( R[c]2 == .(format(R2c,nsmall=2)) )
)HTH, Peter ______________________________________________ R-help@stat.math.ethz.ch 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.
