R

Question

是否可以减少R中图例中符号和相关文本之间的默认间距？我只找到了如何更改图例项之间的空间，而不是符号和文本之间的空间。

par(lwd=1,mai=c(0,0,0,0))
plot.new()
legend(x="left", inset =0,
         c("Simulated by the model"),
         lty=c(1,NA),pch=c(NA,"o"),lwd=c(2,3), col=c("black","red"), box.col=NA,horiz=TRUE,cex=1.5,text.width = c(0.3,0.3))

Answer 1

我们可以在图例中使用参数x.intersp来调整图例符号和文本之间的空白量。

以下是一些示例：

par(lwd = 1, mai = c(0,0,0,0), mfrow = c(2, 2))
prm <- c(0.1, 1.0, 2.0, 3.0)
for (i in 1:length(prm)) {
    plot.new()
    legend(
        x = "left",
        inset = 0,
        c(sprintf("x.intersp = %2.1f", prm[i])),
        lty = c(1, NA),
        pch = c(NA, "o"),
        lwd=c(2, 3),
        col = c("black", "red"),
        box.col = NA,
        horiz = TRUE,
        cex = 1.5,
        text.width = c(0.3, 0.3),
        x.intersp = prm[i])
}