Skip to content

Instantly share code, notes, and snippets.

Created January 6, 2016 00:51
What would you like to do?
rawdata = read.csv("~/Documents/Meteorite/minimeteor.csv")
p <- qplot(log(mass), data=rawdata, binwidth=.4)
p + theme_bw() + geom_histogram(color="black", fill="steelblue")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment