Please be more specific. How did it not work? Did my example not work? Was there an error message or the wrong picture? Did you install and load the TeachingDemo's package so subplot() was in scope? Did the pie chart drawn by subplot() look different (aside its placement and size) from the one you originally got?
Also, continue the cc to R-help@r-project.org so others can contribute or learn something. Bill Dunlap Spotfire, TIBCO Software wdunlap tibco.com > -----Original Message----- > From: bibek sharma [mailto:mbhpat...@gmail.com] > Sent: Friday, November 30, 2012 3:37 PM > To: William Dunlap > Subject: Re: [R] (no subject) > > Thank you Bill. > I want pie of equal sector. I tried your code but did not work.dont know why? > Any suggestion? > > > library(visualFields) > library(car) > a<-saplocmap$p24d2 > ordinate<-data.frame(a$xod,a$yod) > ordinate > plot( a$xod,a$yod, xlim=c(-30,30), > ylim=c(-30,30),xlab="",ylab="",type="p", data=ordinate) > abline(h=0,v=0) > cars <- c(1,1,1,1,1,1,1,1) > color1 <- > c("grey80","grey80","grey80","grey80","gray80","grey30","grey20","gray10" > ) > subplot(pie(cars,col=color1,labels=" > ",radius=0.05,border=NA,cex=0.8),x=3,y=15) > > > > > On Fri, Nov 30, 2012 at 2:26 PM, William Dunlap <wdun...@tibco.com> wrote: > > Try subplot() from the TeachingDemos package. E.g., > > > > > plot(c(1,2,3), c(1,3,2), xlim=c(0,5), ylim=c(0,10)) > > > subplot(pie(1:5), x=4, y=6) > > > abline(h=6, v=4) > > > subplot(pie(1:5), x=1, y=8, size=c(0.5, 0.5)) > > > > Bill Dunlap > > Spotfire, TIBCO Software > > wdunlap tibco.com > > > > > >> -----Original Message----- > >> From: r-help-boun...@r-project.org [mailto:r-help-boun...@r-project.org] On > Behalf > >> Of bibek sharma > >> Sent: Friday, November 30, 2012 2:07 PM > >> To: R help > >> Subject: [R] (no subject) > >> > >> Hello R usuer, > >> > >> The code given below superimposes a pie diagram on another plot > >> containing some points. However, I would like to center the pie > >> diagram on the xy location on the plot, but not on the center. is > >> there any way to re-center pic diagram. > >> Any suggestion or better alternative are highly appreciated. > >> Thank you in advance for your help. > >> > >> Regards, > >> Bibke > >> > >> library(visualFields) > >> library(car) > >> a<-saplocmap$p24d2 > >> ordinate<-data.frame(a$xod,a$yod) > >> plot( a$xod,a$yod, xlim=c(-30,30), > >> ylim=c(-30,30),xlab="",ylab="",type="p", data=ordinate) > >> abline(v=0,h=0) > >> par(new=TRUE) > >> > >> # Define cars vector with 8 values > >> cars <- c(1,1,1,1,1,1,1,1) > >> > >> # Define colors in each sector > >> > >> color1 <- > c("grey80","grey80","grey80","grey80","gray80","grey30","grey20","gray10" > >> ) ## gray10=<0.0001, gray20<0.001, gray30<0.01, gray40=<0.05, gray > >> 80=>0.05 > >> # Putting sector levels > >> car_labels <- c(1,2,3,4,5,6,7,8) > >> car_labels <- paste(car_labels,sep="") > >> > >> # Create a pie chart with defined heading and custom colors > >> # and labels > >> > >> pie(cars, main="Sectors", col=color1, labels=" ", > >> radius=0.05,border=NA, cex=0.8) > >> > >> ______________________________________________ > >> 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. ______________________________________________ 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.
