如何在R中的传奇边界？

Question

我使用R来绘制图例，但我需要绘制黑色边框。

plot.new()
legend(x=0,y=.15, c(" legend1"), cex=1,pt.cex =1.4,col=c("green"),bty="n",fill="green", pch=c(15, 15, 15, 17),border="black")
legend(x=.75,y=.15, " legend", cex=1, pt.cex =1.4,bty="n",col=c("black"), pch=c(17), border="black")

但是在上面的代码中，没有按照预期在下面显示的图像打印黑色边框。我怎么能

将边框（此处为黑色边框覆盖绿色框）和图例放置如下所示。

Answer 1

当然没有边框！您已使用bty = "n"

从?par（在该页面上搜索“bty”）：

  

bty：一个字符串，用于确定绘制的关于绘图的框的类型。如果bty是“o”（默认值），“l”，“7”，“c”，“u”或“]”之一，则生成的框类似于相应的大写字母。值“n”会禁用该框。

删除bty参数或指定与您想要的边框形状相匹配的替代品。

---

根据问题编辑进行更新。

由于您要控制pch符号的填充颜色和边框，请尝试以下操作：

plot.new()
legend(x=0, y=.15, "legend1 ", cex=1, pt.cex=1.4, 
       bty="n", pch=22, col="black",
       pt.bg="green")
legend(x=.75,y=.15, "legend 2", cex=1, pt.cex =1.4, 
       bty="n", pch=24, col="red", pt.bg="white")

关键是使用其中一个pch值，这些值可以着色并填充不同的颜色，即21到35之间的颜色。

从?pch开始，我们的选项是：

  

  
• pch = 21：填充圆圈
  
• pch = 22：填充正方形
  
• pch = 23：填充钻石
  
• pch = 24：填充三角形指向
  
• pch = 25：填充三角形点
  

Answer 2

plot.new()
 legend(x=0,y=.15, c(" legend1"), cex=1,pt.cex =1.4,col=c("green"),
         bty="o",fill="green", pch=c(15, 15, 15, 17) )
 legend(x=.75,y=.15, " legend", cex=1, pt.cex =1.4,
         bty="o",col=c("black"), pch=c(17), box.col="red")

Answer 3

如何使用开放式绘图符号。我认为这应该是你想要的：

plot.new()
legend(x=0, y=.15, "legend1", 
       cex=1, pt.cex =1.4, bty="n", pch=22, pt.bg = "green")
legend(x=.75, y=.15, "legend2", 
       cex=1, pt.cex =1.4, bty="n", pch=24, pt.bg = "black")

查看this short help page以了解更多pch示例。