相关疑难解决方法(0)

我试图将图例的文本与使用的因子变量生成的文本颜色进行颜色匹配geom_text.这是一个最小的工作示例:

df <- data.frame(a=rnorm(10),b=1:10,c=letters[1:10],d=c("one","two"))
p1 <-ggplot(data=df,aes(x=b,y=a))
p1 <- p1 + geom_text(aes(label = c, color=d, fontface="bold"))
p1 <- p1 + scale_color_hue(name="colors should match",breaks=c("one", "two"),
                 labels=c("should be pink", "should be blue"))
p1

我确信这是一个简单的解决方案.对先前帖子的任何建议或参考都会有所帮助.我没有发现任何特定的内容.

我试图获取图例标签的文本颜色以匹配其关联的填充/线条颜色。理想情况下，我希望将标签颜色映射到美学上，但是在这一点上，我很乐意手动指定颜色。这是一些使用内置PlantGrowth数据集的测试代码，其中包括我手动指定标签颜色的尝试：

ggplot(data=PlantGrowth, aes(x=group, y=weight, fill=group)) +
    geom_boxplot() +
    scale_fill_discrete(guide=guide_legend(label.theme=element_text(angle=0,
                                                                    size=9,
                                                                    color=c("red",
                                                                            "green",
                                                                            "blue"))))

当我运行此代码时，图例标签全部使用我指定的第一种颜色（红色）。相反，我希望每个图例标签使用不同的颜色。ggplot2当前是否可以进行此类操作？