Thanks a lot to Demitris for a prompt answer some minutes ago on another tread (see below). To avoid excess mails on the list, I move onto next question:
I have another small plotting problem that confuses me. I want to plot results from a field trial series, using the numbers of the trials as symbols in the plot. pch = as.character(trial_no) works fine, but truncates the trial number to the first digit. As I have sixteen trials in the series I get into problems.... How do I squeeze in two positions as a symbol in a plot? All the best /CG On Thu, November 9, 2006 9:30 am, Dimitris Rizopoulos said: > try the following: > > x <- runif(100, -4, 4) > y <- 1 + 2 * x + rnorm(100, sd = 2) > fit <- lm(y ~ x) > > plot(x, y) > abline(fit) > legend("topleft", expression(paste(R[adj]^2, " = 0.66"))) > > ## or > > plot(x, y) > abline(fit) > legend("topleft", legend = substitute(R[adj]^2 == x, > list(x = summary(fit)$adj.r.squared))) > > > I hope it helps. > > Best, > Dimitris > > ---- > Dimitris Rizopoulos > Ph.D. Student > Biostatistical Centre > School of Public Health > Catholic University of Leuven > > Address: Kapucijnenvoer 35, Leuven, Belgium > Tel: +32/(0)16/336899 > Fax: +32/(0)16/337015 > Web: http://med.kuleuven.be/biostat/ > http://www.student.kuleuven.be/~m0390867/dimitris.htm > > > ----- Original Message ----- > From: "CG Pettersson" <[EMAIL PROTECTED]> > To: <r-help@stat.math.ethz.ch> > Sent: Thursday, November 09, 2006 9:10 AM > Subject: [R] Why do I get a linebreak in the legend? > > >> Dear all, >> >> W2k, R2.4.0 >> >> I want to place a legend in a regression plot, stating the adjusted >> R-square value. After some struggle with the coding I am nearly >> there, but >> only nearly. The best try so far is: >> >> legend("topleft", expression(paste(R[adj]^2), " = 0.66")) >> >> This places the proper information in the legend, but I get a >> linebreak >> before the "= 0.66" and I want the expression on one single line. >> All >> adjustments from this code I have tried so far either produces only >> half >> the expression or produces an error message. >> >> All the best and sorry for a trivial quastion >> /CG >> >> >> -- >> CG Pettersson, MSci, PhD Stud. >> Swedish University of Agricultural Sciences (SLU) >> Dep. of Crop Production Ekology. Box 7043. >> SE-750 07 Uppsala, Sweden >> [EMAIL PROTECTED] >> >> ______________________________________________ >> 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. >> > > > Disclaimer: http://www.kuleuven.be/cwis/email_disclaimer.htm > -- CG Pettersson, MSci, PhD Stud. Swedish University of Agricultural Sciences (SLU) Dep. of Crop Production Ekology. Box 7043. SE-750 07 Uppsala, Sweden [EMAIL PROTECTED] ______________________________________________ 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.