在更改geom_bar顺序时保持一致的颜色？

问题描述

在根据另一个值订购geom_bar（）时，我一直在努力维护图表之间的颜色一致性。

所需：

• 图表之间的A和B颜色保持一致
• 每个图的A和B降序

实际：

• 图表之间A和B交换颜色

library(tidyverse)
dat <- data.frame(x = c("A","B"),y = c(1,2),z = c(4,3))
# Y
dat %>% 
  mutate(x = fct_reorder(x,y,`.desc` = TRUE)) %>% 
  ggplot(aes(x = x,y = y,fill = x)) + 
  geom_bar(stat = "identity")

# Z
dat %>% 
  mutate(x = fct_reorder(x,z,y = z,fill = x)) + 
  geom_bar(stat = "identity")

^{由reprex package（v0.3.0）于2020-08-31创建}

解决方法

这种方法最终对我有用：

~/rpmbuild/BUILD