I installed package plotrix because reading its vignette it looks like it can help me solve a "legend" problem. The package instaleed correctly on my Mac OS/X 10.5.8 But I cannot reproduce the examples centered on function "lgendg".> library(plotrix) > plot(0.5,0.5,xlim=c(0,1),ylim=c(0,1),type="n",+ main="Test of grouped legend function")> legendg(0.5,0.8,c("one","two","three"),pch=list(1,2:3,4:6),+ col=list(2,3:4,5:7)) Error: could not find function "legendg" My problem with the regular R "legend" function is that I cannot indicate in the legend the line plotted by the command "abline" Here is the code. Attached is the plot. Any suggestion is welcome. Thank you. Maura x11(width=10,heigh=8) plot(NN,LB,xlim=c(1,300),ylim=c(0,3), main="Intrinsic Dimensionality of 1D Helix",font.main=2,cex.main=2,col.main="red", xlab="Number of Nearest-Neighbors",ylab="Estimated Dimension",col.lab="red",cex.lab=1,font.lab=2, xaxt="n",yaxt="n",pch=19,col="red4") axis(1,at=NN[1:40],labels=NN[1:40],cex.lab=1,cex.axis=0.8,col.axis="blue",lwd.ticks=0.5,col.ticks ="gray3") axis(2,at=c(0,0.5,1,1.5,2,2.5,3,3.5,4),labels=c(0,0.5,1,1.5,2,2.5,3,3.5,4),cex.lab=1,cex.axis=0.8, col.axis="blue",lwd.ticks=0.5,col.ticks ="gray3") lines(NN,McG,pch=18,col="green") lines(NN,PBJD,pch=20,col="magenta1") points(NN,GRPR,pch=18,col="cyan") abline(h=1,pch= 1,lty=1,col="black") legend("topright",legend = c("Levina-Bickel","MacKay-Ghahramani","Pettis-Bailey-Jain-Dubes","Grassberger-Procaccia","Helix Dimension"), text.width = strwidth("Pettis-Bailey-Jain-Dubes"),pch = c(19,18,20,18,1), col = c("red4","green","magenta1","cyan","black"),text.col = "black",lty=c(-1,-1,-1,1), bg ="snow") e tutti i telefonini TIM! Vai su
On 18.07.2010 17:59, mauede at alice.it wrote:> I installed package plotrix because reading its vignette it looks like it can help me solve a "legend" problem. > The package instaleed correctly on my Mac OS/X 10.5.8 > But I cannot reproduce the examples centered on function "lgendg".You mean "legendg".>> library(plotrix) >> plot(0.5,0.5,xlim=c(0,1),ylim=c(0,1),type="n", > + main="Test of grouped legend function") >> legendg(0.5,0.8,c("one","two","three"),pch=list(1,2:3,4:6), > + col=list(2,3:4,5:7)) > Error: could not find function "legendg"That works for me. Try to upgrade bopth R and plotrix if you have not already.> My problem with the regular R "legend" function is that I cannot indicate in the legend the line plotted by the command "abline" > Here is the code. Attached is the plot. Any suggestion is welcome. Thank you. > Maura > > > x11(width=10,heigh=8) > plot(NN,LB,xlim=c(1,300),ylim=c(0,3), > main="Intrinsic Dimensionality of 1D Helix",font.main=2,cex.main=2,col.main="red", > xlab="Number of Nearest-Neighbors",ylab="Estimated Dimension",col.lab="red",cex.lab=1,font.lab=2, > xaxt="n",yaxt="n",pch=19,col="red4") > axis(1,at=NN[1:40],labels=NN[1:40],cex.lab=1,cex.axis=0.8,col.axis="blue",lwd.ticks=0.5,col.ticks ="gray3") > axis(2,at=c(0,0.5,1,1.5,2,2.5,3,3.5,4),labels=c(0,0.5,1,1.5,2,2.5,3,3.5,4),cex.lab=1,cex.axis=0.8, > col.axis="blue",lwd.ticks=0.5,col.ticks ="gray3") > lines(NN,McG,pch=18,col="green") > lines(NN,PBJD,pch=20,col="magenta1") > points(NN,GRPR,pch=18,col="cyan") > abline(h=1,pch= 1,lty=1,col="black") > legend("topright",legend = c("Levina-Bickel","MacKay-Ghahramani","Pettis-Bailey-Jain-Dubes","Grassberger-Procaccia","Helix Dimension"), > text.width = strwidth("Pettis-Bailey-Jain-Dubes"),pch = c(19,18,20,18,1), > col = c("red4","green","magenta1","cyan","black"),text.col = "black",lty=c(-1,-1,-1,1), > bg ="snow") > >We do not have the data nor do we see the figure, hence this is not reproducible for us. Uwe Ligges> > > > > > > > > > > > > > > e tutti i telefonini TIM! > Vai su > > > > ______________________________________________ > R-help at 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.
-----Messaggio originale----- Da: Uwe Ligges [mailto:ligges at statistik.tu-dortmund.de] Inviato: dom 18/07/2010 18.58 A: mauede at alice.it Cc: jim at bitwrit.com.au; r-help at stat.math.ethz.ch Oggetto: Re: [R] package "plotrix" On 18.07.2010 17:59, mauede at alice.it wrote:> I installed package plotrix because reading its vignette it looks like it can help me solve a "legend" problem. > The package instaleed correctly on my Mac OS/X 10.5.8 > But I cannot reproduce the examples centered on function "lgendg".You mean "legendg". Yes. Sorry for my typo.>> library(plotrix) >> plot(0.5,0.5,xlim=c(0,1),ylim=c(0,1),type="n", > + main="Test of grouped legend function") >> legendg(0.5,0.8,c("one","two","three"),pch=list(1,2:3,4:6), > + col=list(2,3:4,5:7)) > Error: could not find function "legendg"That works for me. Try to upgrade bopth R and plotrix if you have not already. I am running R 2.9.2 on my Mac OS/X 10.5.8 I always feel uncomfortable with upgrades. Shall I uninstall R 2.9.2 in advance of instaling the ew bversion for Mac ? I ave no reason for keeping two versions.> My problem with the regular R "legend" function is that I cannot indicate in the legend the line plotted by the command "abline" > Here is the code. Attached is the plot. Any suggestion is welcome. Thank you. > Maura > > > x11(width=10,heigh=8) > plot(NN,LB,xlim=c(1,300),ylim=c(0,3), > main="Intrinsic Dimensionality of 1D Helix",font.main=2,cex.main=2,col.main="red", > xlab="Number of Nearest-Neighbors",ylab="Estimated Dimension",col.lab="red",cex.lab=1,font.lab=2, > xaxt="n",yaxt="n",pch=19,col="red4") > axis(1,at=NN[1:40],labels=NN[1:40],cex.lab=1,cex.axis=0.8,col.axis="blue",lwd.ticks=0.5,col.ticks ="gray3") > axis(2,at=c(0,0.5,1,1.5,2,2.5,3,3.5,4),labels=c(0,0.5,1,1.5,2,2.5,3,3.5,4),cex.lab=1,cex.axis=0.8, > col.axis="blue",lwd.ticks=0.5,col.ticks ="gray3") > lines(NN,McG,pch=18,col="green") > lines(NN,PBJD,pch=20,col="magenta1") > points(NN,GRPR,pch=18,col="cyan") > abline(h=1,pch= 1,lty=1,col="black") > legend("topright",legend = c("Levina-Bickel","MacKay-Ghahramani","Pettis-Bailey-Jain-Dubes","Grassberger-Procaccia","Helix Dimension"), > text.width = strwidth("Pettis-Bailey-Jain-Dubes"),pch = c(19,18,20,18,1), > col = c("red4","green","magenta1","cyan","black"),text.col = "black",lty=c(-1,-1,-1,1), > bg ="snow") > >We do not have the data nor do we see the figure, hence this is not reproducible for us. Actually I attached the TIFF plot that I am attaching again. Thank you . Maura Uwe Ligges e tutti i telefonini TIM! Vai su
On Jul 18, 2010, at 1:32 PM, <mauede at alice.it> wrote:> > -----Messaggio originale----- > Da: Uwe Ligges [mailto:ligges at statistik.tu-dortmund.de] > Inviato: dom 18/07/2010 18.58 > A: mauede at alice.it > Cc: jim at bitwrit.com.au; r-help at stat.math.ethz.ch > Oggetto: Re: [R] package "plotrix" > > > > On 18.07.2010 17:59, mauede at alice.it wrote: >> I installed package plotrix because reading its vignette it looks >> like it can help me solve a "legend" problem. >> The package instaleed correctly on my Mac OS/X 10.5.8 >> But I cannot reproduce the examples centered on function "lgendg". > > > You mean "legendg". > > Yes. Sorry for my typo. > >>> library(plotrix) >>> plot(0.5,0.5,xlim=c(0,1),ylim=c(0,1),type="n", >> + main="Test of grouped legend function") >>> legendg(0.5,0.8,c("one","two","three"),pch=list(1,2:3,4:6), >> + col=list(2,3:4,5:7)) >> Error: could not find function "legendg" > > > That works for me. Try to upgrade bopth R and plotrix if you have not > already. > I am running R 2.9.2 on my Mac OS/X 10.5.8 > I always feel uncomfortable with upgrades. > Shall I uninstall R 2.9.2 in advance of instaling the ew bversion > for Mac ?No need to do so. The appropriate 2.11.1 folders will be created in the R.framework folder and the links in the Current folder will be updated.> I ave no reason for keeping two versions. > > >> My problem with the regular R "legend" function is that I cannot >> indicate in the legend the line plotted by the command "abline" >> Here is the code. Attached is the plot. Any suggestion is welcome. >> Thank you. >> Maura >> >> >> x11(width=10,heigh=8) >> plot(NN,LB,xlim=c(1,300),ylim=c(0,3), >> main="Intrinsic Dimensionality of 1D >> Helix",font.main=2,cex.main=2,col.main="red", >> xlab="Number of Nearest-Neighbors",ylab="Estimated >> Dimension",col.lab="red",cex.lab=1,font.lab=2, >> xaxt="n",yaxt="n",pch=19,col="red4") >> axis >> (1 >> ,at >> = >> NN >> [1 >> : >> 40 >> ],labels >> = >> NN >> [1 >> :40],cex.lab=1,cex.axis=0.8,col.axis="blue",lwd.ticks=0.5,col.ticks >> ="gray3") >> axis >> (2 >> ,at >> = >> c >> (0,0.5,1,1.5,2,2.5,3,3.5,4 >> ),labels=c(0,0.5,1,1.5,2,2.5,3,3.5,4),cex.lab=1,cex.axis=0.8, >> col.axis="blue",lwd.ticks=0.5,col.ticks ="gray3") >> lines(NN,McG,pch=18,col="green") >> lines(NN,PBJD,pch=20,col="magenta1") >> points(NN,GRPR,pch=18,col="cyan") >> abline(h=1,pch= 1,lty=1,col="black") >> legend("topright",legend = c("Levina-Bickel","MacKay- >> Ghahramani","Pettis-Bailey-Jain-Dubes","Grassberger- >> Procaccia","Helix Dimension"), >> text.width = strwidth("Pettis-Bailey-Jain-Dubes"),pch = >> c(19,18,20,18,1), >> col = c("red4","green","magenta1","cyan","black"),text.col = >> "black",lty=c(-1,-1,-1,1), >> bg ="snow") >> >> > > > > We do not have the data nor do we see the figure, hence this is not > reproducible for us. > > Actually I attached the TIFF plot that I am attaching again.Re-read the Posting Guide. It specifies what can be attached and TIFF files are NOT in the list of acceptable types. Uwe might have gotten a copy but the rest of us did not. -- David Winsemius, MD West Hartford, CT
On 18.07.2010 19:57, David Winsemius wrote:> > On Jul 18, 2010, at 1:32 PM, <mauede at alice.it> wrote: > >> >> -----Messaggio originale----- >> Da: Uwe Ligges [mailto:ligges at statistik.tu-dortmund.de] >> Inviato: dom 18/07/2010 18.58 >> A: mauede at alice.it >> Cc: jim at bitwrit.com.au; r-help at stat.math.ethz.ch >> Oggetto: Re: [R] package "plotrix" >> >> >> >> On 18.07.2010 17:59, mauede at alice.it wrote: >>> I installed package plotrix because reading its vignette it looks >>> like it can help me solve a "legend" problem. >>> The package instaleed correctly on my Mac OS/X 10.5.8 >>> But I cannot reproduce the examples centered on function "lgendg". >> >> >> You mean "legendg". >> >> Yes. Sorry for my typo. >> >>>> library(plotrix) >>>> plot(0.5,0.5,xlim=c(0,1),ylim=c(0,1),type="n", >>> + main="Test of grouped legend function") >>>> legendg(0.5,0.8,c("one","two","three"),pch=list(1,2:3,4:6), >>> + col=list(2,3:4,5:7)) >>> Error: could not find function "legendg" >> >> >> That works for me. Try to upgrade bopth R and plotrix if you have not >> already. >> I am running R 2.9.2 on my Mac OS/X 10.5.8 >> I always feel uncomfortable with upgrades. >> Shall I uninstall R 2.9.2 in advance of instaling the ew bversion for >> Mac ? > > No need to do so. The appropriate 2.11.1 folders will be created in the > R.framework folder and the links in the Current folder will be updated.This is ancient, hence please upgrade anyway - and you have still not reported your plotrix version nor if you updated the package.> >> I ave no reason for keeping two versions. >> >> >>> My problem with the regular R "legend" function is that I cannot >>> indicate in the legend the line plotted by the command "abline" >>> Here is the code. Attached is the plot. Any suggestion is welcome. >>> Thank you. >>> Maura >>> >>> >>> x11(width=10,heigh=8) >>> plot(NN,LB,xlim=c(1,300),ylim=c(0,3), >>> main="Intrinsic Dimensionality of 1D >>> Helix",font.main=2,cex.main=2,col.main="red", >>> xlab="Number of Nearest-Neighbors",ylab="Estimated >>> Dimension",col.lab="red",cex.lab=1,font.lab=2, >>> xaxt="n",yaxt="n",pch=19,col="red4") >>> axis(1,at=NN[1:40],labels=NN[1:40],cex.lab=1,cex.axis=0.8,col.axis="blue",lwd.ticks=0.5,col.ticks >>> ="gray3") >>> axis(2,at=c(0,0.5,1,1.5,2,2.5,3,3.5,4),labels=c(0,0.5,1,1.5,2,2.5,3,3.5,4),cex.lab=1,cex.axis=0.8, >>> >>> col.axis="blue",lwd.ticks=0.5,col.ticks ="gray3") >>> lines(NN,McG,pch=18,col="green") >>> lines(NN,PBJD,pch=20,col="magenta1") >>> points(NN,GRPR,pch=18,col="cyan") >>> abline(h=1,pch= 1,lty=1,col="black") >>> legend("topright",legend >>> c("Levina-Bickel","MacKay-Ghahramani","Pettis-Bailey-Jain-Dubes","Grassberger-Procaccia","Helix >>> Dimension"), >>> text.width = strwidth("Pettis-Bailey-Jain-Dubes"),pch >>> c(19,18,20,18,1), >>> col = c("red4","green","magenta1","cyan","black"),text.col >>> "black",lty=c(-1,-1,-1,1), >>> bg ="snow") >>> >>> >> >> >> >> We do not have the data nor do we see the figure, hence this is not >> reproducible for us. >> >> Actually I attached the TIFF plot that I am attaching again. > > Re-read the Posting Guide. It specifies what can be attached and TIFF > files are NOT in the list of acceptable types. Uwe might have gotten a > copy but the rest of us did not. >No, the tiff probably did not pass our e-mail filters at all. Best, Uwe Ligges
On 07/19/2010 01:59 AM, mauede at alice.it wrote:> I installed package plotrix because reading its vignette it looks like > it can help me solve a "legend" problem. > The package instaleed correctly on my Mac OS/X 10.5.8 > But I cannot reproduce the examples centered on function "lgendg". > > library(plotrix) > > plot(0.5,0.5,xlim=c(0,1),ylim=c(0,1),type="n", > + main="Test of grouped legend function") > > legendg(0.5,0.8,c("one","two","three"),pch=list(1,2:3,4:6), > + col=list(2,3:4,5:7)) > Error: could not find function "legendg" > > My problem with the regular R "legend" function is that I cannot > indicate in the legend the line plotted by the command "abline" > Here is the code. Attached is the plot. Any suggestion is welcome. Thank > you.Hi Maura, The legendg function is fairly new, so you probably have an older version of plotrix. From your example, I suspect that the second last line (split into two lines below) should read: col = c("red4","green","magenta1","cyan","black"), text.col = "black",lty=c(-1,-1,-1,1,1), and thus I don't think you really need legendg. Jim