R中的点颜色

Question

我有一些数据，其中一个载体是性别，其中女性的性别等于1，男性为0。

假设“reg”是我的线性模型。

当我plot(studres(reg)~reg$fitted)时，它给了我想要的情节，但我希望它将男性错误的颜色涂成蓝色。我确信有一个简单的方法可以做到这一点，但我仍然是R的新秀，所以我很感激任何帮助。

感谢。

Answer 1

使用col选项。

另外，请尝试?plot获取一些有用的示例。

set.seed(12)

mydata <- data.frame(
x = rnorm(50),
y = rnorm(50),
male = sample(c(0,1), 50, replace=T)
)

pointCol <- vector()
pointCol[mydata$male==1] <- "blue"

pointCol [mydata $ male == 0]＆lt; - “red”

plot(mydata$x,mydata$y,col=pointCol,pch=16)

legend("topright", pch=16, c("male","female"), col=c("blue", "red"), title = 
"Keys")

Answer 2

plot(reg$fitted, studres(reg), col = dat$gender)

假设数据的格式为：

> dat
   y  x gender
1  0  0 female
2 10  5 female
3 15 10   male
4 20 15 female
5 24 20   male
6 11 25   male
7 30 30 female
8 34 35   male