如何使用ggplot2更改瀑布图中的条形颜色？

Question

我正在尝试使用ggplot2创建我的第一个瀑布图。 我是ggplot2及其（奇怪的）语法的新手，所以请耐心等待。

我找到了这个网站，我跟着它，一切都很完美。 但是，我讨厌颜色。 如何将条形更改为不同的红色和绿色？ （次要问题 - 如何摆脱传奇？）

我用过这个数据帧：

> wfDF
                 category   value sign id    end  start
1         Basic Materials  0.0024  pos  1 0.0024 0.0000
2          Communications  0.0492  pos  2 0.0516 0.0024
3      Consumer, Cyclical  0.0268  pos  3 0.0784 0.0516
4  Consumer, Non-cyclical  0.0245  pos  4 0.1029 0.0784
5             Diversified -0.0037  neg  5 0.0992 0.1029
6                  Energy -0.0040  neg  6 0.0952 0.0992
7               Financial  0.0445  pos  7 0.1397 0.0952
8              Industrial  0.0006  pos  8 0.1403 0.1397
9              Technology -0.0059  neg  9 0.1344 0.1403
10                  Total  0.1345  pos 10 0.0000 0.1344

使用此代码：

ggplot(wfDF, aes(category, fill = sign)) + 
  geom_rect(aes(x = category, xmin = id - 0.475, xmax = id + 0.475, ymin = end, ymax = start)) +
  scale_y_continuous(labels = percent) +     
  scale_x_discrete("", breaks = levels(wfDF$category), labels = gsub(" ", "\n", levels(wfDF$category)))

要创建此图：

Answer 1

将scale_fill_manual添加到ggplot代码的末尾，然后输入您想要的任何颜色。

ggplot(wfDF, aes(category, fill = sign)) + 
geom_rect(aes(x = category, xmin = id - 0.475, xmax = id + 0.475, ymin = end,   ymax = start)) +
scale_y_continuous(labels = percent) +     
scale_x_discrete("", breaks = levels(wfDF$category), labels = gsub(" ", "\n",   levels(wfDF$category))) +
scale_fill_manual(values = c("red","blue"))