Re: [R] greek symbols using pch

From: ecatchpole <e.catchpole_at_adfa.edu.au>
Date: Tue 11 Oct 2005 - 15:25:16 EST

On 11/10/05 01:12, Earl F. Glynn wrote,:
> "FISCHER, Matthew" <mjf@ansto.gov.au> wrote in message
> news:283982AD9F3CD211B3AC00A0C983032F11443674@paradise.ansto.gov.au...
>

>>    In a plot, can I specify pch to be a greek symbol? (I looked at
>>show.pch() in the Hmisc package but couldn't see the right symbols in

> there).
>>If not, I guess I can get around this using text(x,y,expression()).

>
> I'm not sure where this is explained very well. Having ?font give a clue
> about this would be nice.
>
> Use font=5, the symbol font. To see what's in font=5:
>
> par(font=5, las=1)
> plot(0:15,0:15,type="n",ylim=c(15,0),
> main="Symbols in Font=5",
> xlab="", ylab="",xaxt="n", yaxt="n")
> axis(BOTTOM<-1, at=0:15, 1:16)
> axis(LEFT <-2, at=0:15)
> abline(v=0.5 + 0:14,
> h=0.5 + 0:14, col="grey", lty="dotted")
>
> # pch index of any cell is 16*row + column
> for(i in 0:255)
> {
> x <- i %%16;
> y <- i %/% 16;
> points(x,y,pch=i+1)
> }

When I execute this code, I get a calligraphic R or P occurring with all of the nifty characters, e.g. \clubsuit. For example

par(font=5, las=1)
plot(0:1, 0:1, type="n")
points(.5, .5, pch=167)

This occurs on screen and in postscript() output. And with R2.1.0 and R2.2.0. Is this a bug?

Ted.

 > R.Version()
$platform
[1] "i686-pc-linux-gnu"

$arch
[1] "i686"

$os
[1] "linux-gnu"

$system
[1] "i686, linux-gnu"

$status
[1] ""

$major
[1] "2"

$minor
[1] "2.0"

$year
[1] "2005"

$month
[1] "10"

$day
[1] "06"

$"svn rev"
[1] "35749"

$language
[1] "R"

-- 
Dr E.A. Catchpole
Visiting Fellow
Univ of New South Wales at ADFA, Canberra, Australia
and University of Kent, Canterbury, England
- www.ma.adfa.edu.au/~eac
- fax: +61 2 6268 8786		
- ph:  +61 2 6268 8895

______________________________________________
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
Received on Tue Oct 11 15:34:51 2005

This archive was generated by hypermail 2.1.8 : Fri 03 Mar 2006 - 03:40:41 EST