3D饼图：图例太大

传说的问题太大了。 当我改变cex的数量时，字体太小，盒子仍然很大。 希望盒子和测试可以搭配，不会太小也不会太大。

table <- data.frame(num = c(90, 26, 28, 39, 98),
                            countries = c("India","Sri Lanka","Nepal","Bhutan", "China"))
label <-paste(table[,1],"%",sep="")
pie3D(table$num, labels = label, main = "Chart",radius = 1, explode = 0)
par(xpd = TRUE)
legend(1, 0.7, legend = table$countries, cex=0.7, yjust=0.6, xjust = -0.1, 
       fill = heat.colors(length(table$num)))    

您可以与pointsize或决议（width and height）的图像。比你还要适应labelcex.

bmp("plot.bmp", height=600, width=800, pointsize = 15)

pie3D(table$num,labels=label,main="Chart",radius = 1,explode = 0, labelcex=1)
par(xpd=TRUE)
legend(1,0.7,legend=table$countries,cex=0.7,yjust=0.2, xjust = -0.1,
       fill = heat.colors(length(table$num)))  

dev.off()