ggplot2を使って白黒の透明なオーバーラップヒストグラムを作成するには？

Question

ggplot2を使って2つの透明な重なり合うヒストグラムを作成しました。

test = data.frame(condition = rep(c("a", "b"), each = 500), value = rep(-1, 1000)) 
test[1:500,]$value = rnorm(500) 
test[501:1000,]$value = rnorm(500) + 2 

fig = ggplot(test, aes(x = value, fill = condition)) + 
     #scale_fill_grey() + 
     geom_histogram(position = "identity", alpha = .5) 
fig 

結果のプロットは素晴らしいように見えますが、色は変わりません。私はグレースケールまたは黒/白のプロットが必要です。

"scale_fill_grey（）"を使用すると、 "読み取り"するのが非常に難しい透明度のプロットになります。

理想的には、色の代わりにテクスチャを使用する黒い/白のプロットが必要です。たとえば、ある条件では「///」、もう1つの条件では「\\\」、バーが重なったときこれは可能ですか？

Answer 1

これはどうですか（まだテクスチャがない）。私の知る限り

fig = ggplot(test, aes(x = value, fill = condition)) + 
    geom_histogram(position = "identity", alpha = .8) + 
    scale_fill_manual(values=c("grey20", "grey60")) + theme_bw() 
fig