在pie3D中定位标签

Question

尝试更改pie3D中的标签位置，确实阅读了所有可用的帮助，并在此建议给予同样的小伙伴，但无法找到任何真正的解决方案来选择标签的位置，任何人都知道是否有任何真正的解决方案？

示例：

> mydata
        0         1 
0.4082073 0.5917927

库（plotrix）

labels <-  
  c( paste('No: ',round(100*mydata[1],1),'%',sep=''),
     paste('Yes: ',round(100*mydata[2],1),'%',sep=""))
pie3D(mydata, labels=labels,labelcex=1.1, labelrad=1.4, explode=0.05, theta=1,radius =1,start=1.5,
      main='Result',col=c(cols[2],cols[9]),col.main='blue')

Answer 1

获取标签的真实位置：

   pos<-pie3D(mydata, labels=labels,labelcex=1.1, 
             labelrad=1.4, explode=0.05, theta=1,radius =1,
             start=1.5,main='Result', col=c(cols[2],cols[9]),col.main='blue')

然后：

> pos
[1] 2.782421 5.924014

然后一个接一个地改变位置（你可以玩一下）：

pos[1]<-2.1
pos[2]<-5.3

检查新位置是否设置正确

> pos
[1] 2.1 5.3

然后使用“labelpos = pos”将其添加到参数中，如下所示

labels <-  
  c( paste('No: ',round(100*mydata[1],1),'%',sep=''),
     paste('Yes: ',round(100*mydata[2],1),'%',sep=""))

pie3D(mydata, labels=labels,labelcex=1.1, labelrad=1.4, 
      explode=0.05, theta=1,radius =1,start=1.5,
      main=''Result'',col=c(cols[2],cols[9]),col.main='blue',
      labelpos=pos)