R图例垂直裁剪

Question

我想在我的字频图中添加一个图例。我有10个项目作为矢量，除了图表显示为图例。但它被裁剪还是没有完全显示？！

l <- length(plottedTerms)    
legend("topright", 
       legend = t(plottedTerms), 
       title="Legend", 
       pt.cex=1, cex = 0.7, col=1:l, 
       text.col = 1:l, lty = 1)