R 颜色轴与点相同

R 颜色轴与点相同,r,ggplot2,R,Ggplot2,如何使x轴的颜色与点的颜色相同 理想情况下,我不想手动设置颜色,我的真实数据集在每个方面都有20个点 d = data.frame(x = c("A","B","C"),y = c(1,2,3), color = c("A","B","C")) ggplot(d, aes(x= x, y = y, color = color))+geom_point() 尝试: 库(RColorBrewer) 我给整个x轴或轴标签上色?如果你指的是标签,问题是这是重复的,不是重复的。我不想用col v

如何使x轴的颜色与点的颜色相同

理想情况下,我不想手动设置颜色,我的真实数据集在每个方面都有20个点

d = data.frame(x = c("A","B","C"),y = c(1,2,3), color = c("A","B","C"))
    ggplot(d, aes(x= x, y = y, color = color))+geom_point()
尝试:

库(RColorBrewer)

我给整个x轴或轴标签上色?如果你指的是标签,问题是这是重复的,不是重复的。我不想用col vec手动设置颜色。有没有办法动态获取点使用的颜色并将x标签涂成相同的颜色?“将x标签涂成相同的颜色”我不明白你的意思。是否要给轴标签上色?排队?如果是,怎么做?为什么?你能提供一个预期输出图的模型吗?如果你看图,点是彩色的。我希望x轴标签与点的颜色相同。
library(RColorBrewer)
myColors <- brewer.pal(length(levels(as.factor(d$color))),"Set1")
names(myColors) <- levels(as.factor(d$color))
colScale <- scale_colour_manual(name = "color",values = myColors)
ggplot(d, aes(x= x, y = y, color = color))+geom_point()+ theme(axis.text.x =element_text( colour = myColors))+colScale