R 由于添加了数字，图例显示了一半_R_3d_Plotrix

R 由于添加了数字，图例显示了一半

r 3d

R 由于添加了数字，图例显示了一半,r,3d,plotrix,R,3d,Plotrix,在图例中有很长的文字。在我添加数字后，此文本显示一半。我的代码：库（plotrix） x您需要调整一些图例参数，尤其是xjust和adj： pie3D（x，标签=lbls，分解=0.1，高度=0.05， main='textText'，col=colors，mar=c（2,4,4,4））图例（0.75,0.7，标签，cex=0.46，填充=颜色，xjust=0.16，插图=0，调整=c（1，0））我添加 par（xpd=TRUE）在明细表和图例之间 library(plotrix)

在图例中有很长的文字。在我添加数字后，此文本显示一半。我的代码：

库（plotrix）
x您需要调整一些图例参数，尤其是xjust
和adj
：
pie3D（x，标签=lbls，分解=0.1，高度=0.05，
main='textText'，col=colors，mar=c（2,4,4,4））
图例（0.75,0.7，标签，cex=0.46，填充=颜色，xjust=0.16，
插图=0，调整=c（1，0））

我添加
par（xpd=TRUE）
在明细表和图例之间
library(plotrix)
x <- c(16.6, 8.3, 11.7, 10.6,38.5,14.3)
lbls <- paste(x,"%") 
labels <- c("TEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXT", "TEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXT", "TEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXT", 
            "TEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXT", "TEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXT",
            "TEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXTTEXT")
colors<-c("#F69646","#B70000","#002060","#553C75","#632523","#00B0EF")
pie3D(x, labels=lbls,explode=0.1, height=0.05,  main='TEXTTEXTTEXTTEXTTEXTTEXT', col=colors)
legend(0.75,1.1, labels, cex = 0.46,fill = colors)