Como adiciono uma paleta de cores em escala de cinza no ggplot2? [duplicado]

Question

Quero fazer uma versão em escala de cinza de meu gráfico de barra para leitores daltônicos. Eu usei o código abaixo. Como modifico o código, dado que estou satisfeito com o resto do enredo como está?

ggplot(dat, aes(x=PSP,fill=factor(DECAY)))+
  geom_bar(width=0.5)+facet_wrap(~SU)+xlab("Sampling Unit (SU)")+ylab("Count")+
  labs(fill="LEVEL OF DECAY")+ggtitle("Breakdown of decay per principle sample plot (PSP)")+
  scale_fill_discrete(breaks=c("0", "0.5", "1", "2", "3"),
                      labels=c("None (Healthy)", "Decay of crown", "Recently dead",
                               "Advanced decay","Standing snags"))

Answer 1

que tal substituir scale_fill_discrete(...)por scale_fill_grey(...)?

https://ggplot2.tidyverse.org/reference/scale_grey.html