-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Birgit Lemcke
Sent: Thursday, May 29, 2008 6:05 AM
To: Gabor Grothendieck
Cc: R Hilfe
Subject: Re: [R] boxplot with text and symbols on x
Thanks that was a huge help.
Now I am using this:
pdf("InfLengMaxVarHomogeneity.pdf")
plot(inflorescence_length_Max~Sex,xaxt="n" #unterdrückt
"normale x- Achse , ylab="inflorescence length max",
main="Bartletts Homogeneity for inflorescence length
Max",data=FemMal_Sex)
Homo<-bartlett.test(FemMal_Sex$inflorescence_length_Max,FemMal
_Sex$Sex)
text( 2, 500, "Bartlett's K-squared=", col='red',adj = c(1,0)
) text( 2, 500, round(Homo$statistic,digits=5), col='red'
,adj = c(0,0)) text( 2, 480, "df=", col='red',adj = c(1,0) )
text( 2, 480, Homo$parameter, col='red' ,adj = c(0,0))
text( 2, 460, "p-value=", col='red', adj = c(1,0)) text( 2,
460, round(Homo$p.value,digits=5), col='red', adj = c(0,0))
axis(1,at=c(1,2) #Mache punkte auf Achse in Position 1 und 2
, lab=expression( "\u2642", "\u2640")) #zeichne dort Mann/Frau
Symbole
dev.off()
But the symbols do not appear in the pdf. What is the reason
for that and how can I create a pdf with the symbols.
Thanks again
Birgit
Am 29.05.2008 um 13:13 schrieb Gabor Grothendieck:
1. See ?locator
2. Try this:
plot(1:2, pch = c("\u2640", "\u2642"))
On Thu, May 29, 2008 at 4:40 AM, Birgit Lemcke
<[EMAIL PROTECTED]> wrote:
Hello R-user community!
I am running R 2.7.0 on a Power Book (Tiger). (I am still R and
statistics
beginner)
I did the following :
pdf("InLnegthMaxHomogeneity.pdf")
boxplot(inflorescence_length_Max~Sex, main="Bartletts
Homogeneity for
inflorescence length",data=FemMal_Sex)
Homo<-bartlett.test(FemMal_Sex$inflorescence_length_Max,FemMal_Sex
$Sex)
text( 2, 500, "Bartlett's K-squared=", col='red',adj =
c(1,0) ) text(
2, 500, round(Homo$statistic,digits=5), col='red' ,adj = c
(0,0))
text( 2, 480, "df=", col='red',adj = c(1,0) ) text( 2, 480,
Homo$parameter, col='red' ,adj = c(0,0))
text( 2, 460, "p-value=", col='red', adj = c(1,0)) text( 2, 460,
round(Homo$p.value,digits=5), col='red', adj = c(0,0))
dev.off()
As I am still not very good in R, I guess it is not the
easiest way
to implement the text and it was kind of fiddling around
to find the
right position for the text.
I would be glad if somebody would have an easier solution.
My second question is about adding symbols (usual male and female
symbol) to
the x-axis to label the boxes.
I would be very glad if somebody could help mw with this.
Many thanks in advance.
Greets
Birgit
Birgit Lemcke
Institut für Systematische Botanik
Zollikerstrasse 107
CH-8008 Zürich
Switzerland
Ph: +41 (0)44 634 8351
[EMAIL PROTECTED]
175 Jahre UZH
«staunen.erleben.begreifen. Naturwissenschaft zum
Anfassen.» Weitere
Informationen http://www.175jahre.uzh.ch/naturwissenschaft
______________________________________________
R-help@r-project.org 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.
Birgit Lemcke
Institut für Systematische Botanik
Zollikerstrasse 107
CH-8008 Zürich
Switzerland
Ph: +41 (0)44 634 8351
[EMAIL PROTECTED]
175 Jahre UZH
«staunen.erleben.begreifen. Naturwissenschaft zum Anfassen.»
Weitere Informationen http://www.175jahre.uzh.ch/naturwissenschaft
______________________________________________
R-help@r-project.org 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.
