New in Wolfram Mathematica 7: Automatic Histogram Generation  previous | next 
Generate 3D Histograms from Bivariate Data
In[1]:=

Click for copyable input
Histogram3D[RandomReal[NormalDistribution[1, 1], {1000, 2}], 15]
Out[1]=