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

Question

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

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

Answer 1

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

解决方案是在绘图之前打开您需要的精确尺寸的绘图。在 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)