This is documentation for Mathematica 3, which was
based on an earlier version of the Wolfram Language.
 2.9.8 Three-Dimensional Graphics Primitives One of the most powerful aspects of graphics in Mathematica is the availability of three-dimensional as well as two-dimensional graphics primitives. By combining three-dimensional graphics primitives, you can represent and render three-dimensional objects in Mathematica. Three-dimensional graphics elements. Every time you evaluate rcoord, it generates a random coordinate in three dimensions. In[1]:= rcoord := {Random[ ], Random[ ], Random[ ]} This generates a list of 20 random points in three-dimensional space. In[2]:= pts = Table[Point[rcoord], {20}] ; Here is a plot of the points. In[3]:= Show[ Graphics3D[ pts ] ] This gives a plot showing a line through 10 random points in three dimensions. In[4]:= Show[ Graphics3D[ Line[ Table[rcoord, {10}] ] ] ] If you give a list of graphics elements in two dimensions, Mathematica simply draws each element in turn, with later elements obscuring earlier ones. In three dimensions, however, Mathematica collects together all the graphics elements you specify, then displays them as three-dimensional objects, with the ones in front in three-dimensional space obscuring those behind. Every time you evaluate rantri, it generates a random triangle in three-dimensional space. In[5]:= rantri := Polygon[ Table[ rcoord, {3} ] ] This draws a single random triangle. In[6]:= Show[ Graphics3D[ rantri ] ] This draws a collection of 5 random triangles. The triangles in front obscure those behind. In[7]:= Show[ Graphics3D[ Table[rantri, {5}] ] ] By creating an appropriate list of polygons, you can build up any three-dimensional object in Mathematica. Thus, for example, all the surfaces produced by ParametricPlot3D are represented simply as lists of polygons. The package Graphics`Polyhedra` contains examples of lists of polygons which correspond to polyhedra in three dimensions. This loads a package which defines various polyhedra. In[8]:= <