Like the histogram shown below:
(source: cern.ch)
Like the histogram shown below:
(source: cern.ch)
Maybe with geom_step
library('ggplot2')
set.seed(1)
x <- unlist(Map(rpois, 20, 4:1 * 5))
qplot(seq_along(x), x, geom = 'step')
A less satisfying way, using layering of a black color hitsogram under one with no color with white fill.
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()