[R] Plotting symbols with two positions?

[CG Pettersson]

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" <cg.pettersson at evp.slu.se>
> To: <r-help at 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
>> cg.pettersson at vpe.slu.se
>>
>> ______________________________________________
>> R-help at 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
cg.pettersson at vpe.slu.se