在基础R的散点图中转换图例的形状和颜色

Posted 2023-02-23

【中文标题】在基础R的散点图中转换图例的形状和颜色

【英文标题】：Transform the shape and colors of legend in scatterplot in base R

【发布时间】：2021-11-25 00:25:21

【问题描述】：

我正在尝试在基础 R 中制作此散点图： https://i.stack.imgur.com/qdgGN.png

此散点图基于 mtcars 数据。

现在我尝试了这个，但是我无法获得相同的图例。 如何将正方形变成点？ 如何获得完全相同的颜色？ 我怎么知道图例是哪种格式？

这是我的代码：

cols = c("deepskyblue", "magenta", "gray50")
plot(mpg ~ wt, xlab="Weight (1000lbs)", ylab="Miles / gallon", col = cyl, pch = 19, data=mtcars)
legend(x = "topright",
       title = "Number of cylinders",
       horiz = TRUE,
       legend = c("4", "6", "8"), 
       bty = 'n',
       cex = 0.7,
       fill = cols)

顺便说一句：我现在制作了 cols，但我认为还有另一种方法可以解决它。

提前致谢！

【参考方案1】：

“填充”是指用颜色填充的方块。 您需要改为使用“pch”参数，这样您就可以添加“col”参数来选择您的点颜色。 有关信息，pch 对应于您要在图例中选择的形状。https://www.r-bloggers.com/2021/06/r-plot-pch-symbols-different-point-shapes-in-r/

替换

fill=cols

通过

col = cols,
pch=19)

完整代码：

cols = c("deepskyblue", "magenta", "gray50")
plot(mpg ~ wt, xlab="Weight (1000lbs)", ylab="Miles / gallon", col = cyl, pch = 19, data=mtcars)
legend(x = "topright",
       title = "Number of cylinders",
       horiz = TRUE,
       legend = c("4", "6", "8"), 
       bty = 'n',
       cex = 0.7,
       col = cols,
       pch=19)

如果您想使用不同的颜色，那么您可以选择以下颜色。 http://www.stat.columbia.edu/~tzheng/files/Rcolor.pdf