This is documentation for Mathematica 5.2, which was
based on an earlier version of the Wolfram Language.

## Visualization with Mathematica

### Mathematica makes it easy to create stunning visual images.

This creates a 3D parametric plot with automatic choices for most options.

Here is the same plot with a variety of specific choices for options.

#### Mathematica can also generate sound.

This plays a "whoosh" sound with the specified waveform.

For more examples of sounds, look at the Sound Gallery.

#### Mathematica includes primitives from which you can build up 2D and 3D graphics of any complexity.

Here is a list of point primitives.

g=Flatten[Table[Point[{p/q,Denominator[p/q]}],{q,100},{p,q-1}]];

Here are the first five elements in the list.

Take[%,5]

{Point[{12,2}],Point[{13,3}],Point[{23,3}],Point[{14,4}],Point[{12,2}]}

This is the corresponding 2D graphic.

This generates a list of 3D cuboid primitives.

g=Flatten[Table[If[BitAnd[x,y,z]⩵0,Cuboid[{x,y,z}],{}],{x,0,15},{y,0,15},{z,0,15}]];

Here are the first five elements in the list.

This shows the graphics corresponding to the list of primitives.

#### Mathematica lets you produce animated movies as well as static graphics.

Double-click the graphic to start the animation.

Here is another animation.