Skip to content

Instantly share code, notes, and snippets.

@cimentadaj
Created July 19, 2016 14:03
Show Gist options
  • Save cimentadaj/7c45022dc2fbfdfe9030fccfa5fa7300 to your computer and use it in GitHub Desktop.
Save cimentadaj/7c45022dc2fbfdfe9030fccfa5fa7300 to your computer and use it in GitHub Desktop.
library(UsingR); data(galton); library(reshape); long <- melt(galton)
g <- ggplot(long, aes(x = value, fill = variable))
g <- g + geom_histogram(colour="black", binwidth = 1)
g <- g + facet_grid(. ~variable)
g
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment