powered by
data(GlidingSnakes)
http://www.flyingsnake.org/
data(GlidingSnakes) histogram(~undulation.rate , data=GlidingSnakes, n=7, xlab = "Undulation rate (Hz)", type='count')
Run the code above in your browser using DataLab