This should actually be really simple but I\'m having a really hard time finding a solution to this problem.
I have two very simple numeric vectors in R. I am simply
Here is the ggplot version of this graph.
require(ggplot2) require(reshape2) set.seed(1) df <- data.frame(x = rnorm(n = 1000, mean = 5, sd = 2), y = rnorm(n = 1000, mean = 2), z = rnorm(n = 1000, mean = 10)) ggplot(melt(df), aes(value, fill = variable)) + geom_histogram(position = "dodge")