如何在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的帮助。我在下面得到了这个情节。黄点非常浅，有没有办法为它们画一个黑色边框？

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)))