r - 如何在 R 中绘制具有不同颜色和标记的 60x2 矩阵？

Question

a是一个 60*2 维矩阵。

> dim(a)
[1] 60  2

plot(a)给了这个

如何自定义情节，以便

• 第 1-30 行：方形实心标记；第 31-60 行：圆形实心标记。
• 第 1-10 行：白到红渐变；
• 第 31-40 行：白到红渐变；
• 第 11-20 行：白色到黄色渐变；
• 第 41-50 行：白色到黄色渐变；
• 第 21-30 行：白色到蓝色渐变；
• 第 51-60 行：白色到蓝色渐变；

---

非常感谢@Wietze314 的帮助。我在下面得到了这个情节。黄色的圆点很亮，有没有办法给它们画一个黑色的边框呢？

标签： rplotcolorsmarkers

Answer 1

使用col和pch参数指定每个数据点的颜色和形状。

a <- data.frame(x = rep(1:10,6), y = rep(1:6, each = 10))

WhRd <- colorRampPalette(c("white", "red"))
WhYl <- colorRampPalette(c("white", "yellow"))
WhBl <- colorRampPalette(c("white", "blue"))

plot(a,
     col = rep(c(WhRd(10),
             WhYl(10),
             WhBl(10)),2),
     pch = c(rep(15,30),
             rep(16,30)))

要添加边框，只需在原始点上绘制额外的点

points(a,
     col = 'black',
     pch = c(rep(0,30),
             rep(1,30)))