| New in Wolfram Mathematica 6: Real-Time 3D Graphics | ◄ previous | next ► |
In[1]:= | GraphicsGrid[
Table[Graphics3D[{Yellow, Opacity[.5],
PolyhedronData["SnubCube", "Faces"]},
ViewVector -> RandomReal[2, 3], ViewAngle -> RandomReal[{.3, 3}],
Boxed -> False], {4}, {4}], Frame -> All] |
Out[1]= ![]() | ![]() |