R:我可以在另存为 PDF 时修复我的图例吗？

Question

当我运行此代码时

plot(c(0,1), c(0, 1), type = "n")
legend("topleft", legend = c("Model", "Data"),
           lwd = c(3, NA),
           pch = c(NA, 16),
           bty = "n", inset = 0.02,
           cex = 2)

正如预期的那样，我看到了这一点:


但是，当我将它包装在 pdf("legendTest.pdf") 中时... dev.off() ，保存的 PDF 有一条穿过该点的线。



我可以更正这个问题，还是只需要以另一种格式保存？我在 Mac 上，使用预览和 Chrome 查看 PDF 时出现问题。我下载了Adobe Reader看看它做了什么，然后图例文本和pch点消失了，只留下模型线。

Answer 1

您可以通过显式设置行类型(参数 lty )来解决此问题，如下所示:

plot(c(0,1), c(0, 1), type = "n")
legend("topleft", legend = c("Model", "Data"),
       lwd = c(3, NA),
       lty = c(1, 0), # 0=blank, 1=solid (default). See ?par for more.
       pch = c(NA, 16),
       bty = "n", inset = 0.02,
       cex = 2)

编辑
lwd 的文档参数，在 ?par解释说:

'lwd' The line width, a positive number, defaulting to '1'. The interpretation is device-specific, and some devices do not implement line widths less than one.

Mac 的默认 R 图形设备必须是其中之一。 (FWIW，使用您的代码，我自己的 Windows 图形设备确实显示了一条穿过数据点的线，就像在 pdf 中一样。)

无论如何，看起来使用 lty 通常更安全。比 lwd来控制这个特定的细节。