# Plot rate of change in $x$ axis of list of points

I have a list of points, that may have clusters in some of the $x$ axis values, and my goal is to get a function that shows that graphically.

Something like this, but the red function is "hand drawn", it's just for reference.

The high points of the red plot shows where the clusters are and the low points where are the points that are most isolated.

-
I think you can just plot the points in front of their Histogram or SmoothHistogram. –  Kuba Mar 9 '14 at 14:26
or perhaps DistributionChart[data,BarOrigin->Left]. See:reference.wolfram.com/mathematica/ref/DistributionChart.html –  ubpdqn Mar 9 '14 at 14:38

values = Transpose[{Join[