New in Wolfram Mathematica 6: Real-Time 3D Graphics  previous | next 
Attach Arbitrary Tooltips to 3D Graphics
Mathematica 6 lets you label any part of a 3D graphic with a dynamic tooltip.
In[1]:=

Click for copyable input
Plot3D[Evaluate[

  Table[Tooltip[Sin[x + n y], 

    Plot[Sin[n x], {x, 0, 2 Pi}, Filling -> Axis, 

     FillingStyle -> Pink, ImageSize -> 200]], {n, 3}]], {x, 0, 

  3}, {y, 0, 3}, PlotStyle -> Table[Opacity[.7, Hue[i/6]], {i, 4}]]