R指定不同于填充和线条的点边框颜色

这与

我有一个填充点（pch=21）、黑色边框和绿色填充的绘图，但我也有与填充颜色相同的错误胡须。我知道我可以使用“col”和“pt.bg”的组合匹配图例中的点，但是线颜色与点边框匹配，这不是我需要的：

x=1:10
y=runif(10)
plot(x,y,lwd=3,col="black",bg="green",pch=21,cex=2)
arrows(x,y-0.05,x,y+0.05,lwd=3,col="green",angle=90,code=3)
legend(5,0.8,col="black",pt.bg="green",lwd=3,pch=21,legend="text",cex=2)

给出了以下内容

---

有没有一种方法可以使图例中的绿色线条和绿色填充点的点边框为黑色？如果有胡须就更好了，但我认为这可能是不可能的…

打两个

legend

电话。一个用

bg=NA

绘制直线，另一个用

bty=“n”

绘制点：

set.seed(1)
x=1:10
y=runif(10)
plot(x, y, lwd = 3, col = "black", bg = "green", pch = 21, cex = 2)
arrows(x, y-0.05, x, y+0.05, lwd = 3, col = "green", angle = 90, code = 3)
legend("topright",
       col="green",
       lwd = 3,
       lty = 1,
       legend = "text",
       cex = 2,
       bg = NA)
legend("topright",
       col = "black",
       pt.bg = "green",
       pch = 21,
       lwd = 3,
       legend = "text",
       cex = 2,
       lty = 0,
       bty = "n")