R {ggplot2}在应用的facet_grid（）中按颜色定义条形栏？

Question

我有两个变量在多个层次上的基本情节，我可以通过facet_grid（）来显示。因此，我有一组相同颜色的树皮，按照两个变量的级别排列。

但是，如果我想表明，我的数据来自不同的来源？即从周五到周日 - 从RED数据，从BLACK数据到周四。

有没有办法通过颜色表示我的最终情节，我的数据来自RED和BLACK数据集？

是这样的：

（例如取自：http://www.cookbook-r.com/Graphs/Facets_(ggplot2)/）

示例代码：

require(ggplot2) 
library(reshape2) 

head(tips) 

ggplot(tips, aes(x=total_bill)) + geom_histogram(binwidth=2,colour="white")+ 
    facet_grid(sex ~ day) 

我知道我可以在Inkscape中eaily改变这些颜色，也许有一个简单的基于R的解决方案？

---

数据源（红色和黑色），我将在图标题注明：无需指定的情节。

Answer 1

通过分配day到fill审美和手动定义为day你可以在不同值的颜色获得期望的效果。

下面的代码：

ggplot(tips, aes(x=total_bill, fill = day)) + geom_histogram(binwidth=2, colour = "white")+ 
    facet_grid(sex ~ day) + 
    scale_fill_manual(values = c("Fri" = "Red", "Sat" = "Red", "Sun" = "Red", "Thur" = "Black")) 

给出了如下情节：

传说可以通过添加+ guides(fill = "none")

隐藏

Answer 2

这工作：

ggplot(tips, aes(x=total_bill, fill=day=="Thur")) + geom_histogram(binwidth=2)+ 
    facet_grid(sex ~ day) + 
    scale_fill_manual(values=c("red", "black")) 

编辑：添加颜色“黑”和“红”