r3dplotrix

due to the addition of numbers the legend is half visible

In legend have long text. This text is half visible after I add the numbers. My code:

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)

x

Solution

  • I add

    par(xpd=TRUE)

    between schedule and legend