New in Wolfram Mathematica 6: Dynamic Interactivity  previous | next 
Manipulate Parameters in 3D Graphics
Mathematica 6 lets you manipulate 3D graphics, interactively changing parameters, then directly rotating or zooming with the mouse.
In[1]:=

Click for copyable input
Manipulate[

 SphericalPlot3D[

  1 + a Sin[3 \[Phi]] Sin[2 \[Theta]], {\[Theta], 0, Pi}, {\[Phi], 0, 

   2 Pi}, Mesh -> None, Ticks -> None, PlotRange -> 5], {a, 0, 5}]
Out[1]=