Различные цветовые точки в 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"))

Это создает график, как показано ниже

Есть две вещи, которые я выберу sh изменить, но я не уверен, как go об этом. 1) Я хочу изменить типы точек, которые появляются, используя функцию pch на графике. Так, например, я хочу, чтобы красные точки выглядели как звезда, а синие точки - как треугольник. Как бы я go об этом? 2) Я хочу, чтобы легенда отображала эти символы и была соответственно окрашена. Например, вместо «Точка» это должен быть «.» он окрашен в синий или красный цвет в зависимости от того, какой цвет я решил назначить.

Большое спасибо за помощь.

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