使用 par 时图例框宽度不正确

我有问题，我的图例太大，我的代码：

par(mfrow=c(1,2))
hist(alvsloss,breaks = 100, freq=F,main="Histogramm,
 density curve (gaussian kernel) \n and fitted normal distribution of Allianz simple losses ",xlim=c(-0.15,0.15),xlab="loss",ylab="density",cex.axis=1.2,cex.lab=1.2)
lines(density(alvsloss), col="black", lwd=2)
curve(dnorm(x, mean = mean(alvsloss), sd = sd(alvsloss)), add=TRUE, col="black",lwd=2,lty="dotted")

legend(-0.155, 30, c("(Gaussian) Kernel density","fitted normal distribution"),lwd=2, cex=0.8, 
   col=c("black","black"), lty=1:2)


qqnorm(alvsloss,main="normal QQ Plot",cex.axis=1.2,cex.lab=1.2)
qqline(alvsloss)

这给出了下图：

问题是，左边的图例太大了，如何控制框的宽度？盒子太大了。

数据可以在这里找到：http://uploadeasy.net/upload/ocafq.rar http://uploadeasy.net/upload/ocafq.rar

图例右侧的空白告诉我您手动加宽了绘图窗口。在手动调整大小时，图例不能很好地缩放。

解决方案是在绘图之前打开所需大小的绘图。在 Windows 中，这是通过以下方式完成的windows(width=10, height=8)。单位为英寸。周围的框现在应该与文本更加紧密。

如果这仍然不令人满意，您应该尝试：

1. 减小图例的字体大小cex=0.7
2. 删除图例周围的框bty = "n"并使用\n到 将您的图例分成几行
3. 您可以使用以下方法将您的图例放在更左侧"topleft"而不是坐标

我会这样做：

legend("topleft", 
 legend=c("(Gaussian)\nKernel\ndensity","Fitted\nnormal\ndistribution\n"),
 bty = "n",lwd=2, cex=0.7, col=c("black","black"), lty=1:2)