在R ggplot中,有没有办法创建直方图,没有填充颜色和条形之间的垂直边框？

Question

如下图所示的直方图:

Answer 1

也许有 geom_step

library('ggplot2')

set.seed(1)
x <- unlist(Map(rpois, 20, 4:1 * 5))
qplot(seq_along(x), x, geom = 'step')

Answer 2

一种不太令人满意的方法,在一个没有颜色和白色填充的情况下使用黑色色情图层的分层.

set.seed(12)
x <- rpois(1000, 30)

bw <- 2
col <- 'black'
ggplot(data.frame(x), aes(x=x)) + 
    geom_histogram(binwidth=bw, color = col, fill=col, size=2) +
    geom_histogram(binwidth=bw, fill='white') +
    theme_bw()