为各个酒吧设置颜色

Question

我无法设置条形图的颜色。这是我正在使用的代码。打印图表时，所有栏都默认为灰色。

a<- c("a", "b", "c", "d", "e")
b<- rnorm(5)
A<-data.frame(a,b)
group.colors <- c(a= "blue", 
                  b= "orange", 
                  c= "blue",
                  d = "orange", 
                  e = "orange")
A%>%ggplot(aes(a)) +
  geom_bar() +
  scale_fill_manual(group.colors)

Answer 1

您需要将变量映射到fill美学，否则更改scale_fill_manual无效，因为没有可以填充的比例：

ggplot(A, aes(a, fill = a)) +
  geom_bar() +
  scale_fill_manual(values = group.colors)