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.
