Как создать черно-белые прозрачные перекрывающиеся гистограммы с помощью ggplot2?

Question

Я использовал ggplot2 для создания двух прозрачных перекрывающихся гистограмм.

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()» приводит к заговору с прозрачностью, который очень трудно «читать».

В идеале, мне нужен черно-белый сюжет, который использует текстуру вместо цвета, например, перекрестное штрихование: «///» для одного условия, «\\\» для другого условия, в результате чего «XXX «когда перекрываются штанги. Это возможно?

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