powered by
pie3D.labels(radialpos,radius=1,height=0.3,theta=pi/6, labels,labelcol=par("fg"),labelcex=1.5)
pie3D.label
pie3D
draw.tilted.sector
pieval<-c(2,4,6,8) bisectors<-pie3D(pieval,explode=0.1,main="3D PIE") pie3D.labels(bisectors,labels=c("TWO","FOUR","SIX","EIGHT"))
Run the code above in your browser using DataLab