Я пытаюсь построить гистограмму с масштабом log y, используя ggplot, geom_histogram и scale_y_log10. Большинство регионов (с числом больше 1) выглядят правильно: фон прозрачный, а полосы гистограммы заполняются черным цветом по умолчанию. Но при значениях 1 цвета инвертируются: черный фон и прозрачная заливка гистограмм. Этот код (ниже) генерирует пример на графике.
Может ли кто-нибудь объяснить причину этого? Я понимаю проблемы, связанные с журнальными шкалами, но я не могу найти решение этого. Я надеюсь, что там будет простое исправление, или что я что-то пропустил.
set.seed(1)
df <- data.frame(E=sample(runif(100), 20, TRUE))
ggplot(df,aes(E)) + geom_histogram(binwidth=0.1) + scale_y_log10(limits=c(0.1,100)) + xlim(0,1)