R中的不同色点

Question

我有以下 R 代码，

x1=c(3,2,4,1,2,4,4)
x2=c(4,2,4,4,1,3,1)
Y=c("red","red","red","red","blue","blue","blue")
plot(x1,x2,col=Y,pch=8)
grid(NULL,NULL,col="cornsilk2")
legend("right",c("Point","star"),col=c("red","blue"))

这会创建一个如下图所示的图

有两件事我想改变，但我不知道如何去做。 1）我想使用绘图中的 pch 功能更改出现的点的类型。 例如，我希望红点显示为星形，而蓝点显示为三角形。 我该怎么办？ 2）我希望图例显示这些符号并分别正确着色。 例如，它应该是一个“.”而不是“Point”。 蓝色或红色取决于我决定分配的颜色。

非常感谢您的帮助。

Answer 1

你指定一个像你的颜色的向量：

SHAPE = ifelse(Y=="red",8,2)
plot(x1,x2,col=Y,pch=SHAPE)
legend("right",c("Point","star"),col=c("blue","red"),pch=c(2,8))