Ejemplo 1 paso, ejecutado en orden en una sola sesión. Cada paso se ejecutó contra el motor y la salida de abajo es lo que produjo.
Graphics3D[{Opacity[.5], Blue, Translate[{Cone[], White, Opacity[.9], Polygon[{{-1, -.25, -1}, {1, -.25, -1}, {1, .25, 1}, {-1, .25, 1}}]}, {0, 0, 0}], Translate[{Cone[], Yellow, Opacity[.9], Polygon[{{1, 1, -1}, {1, 1, 1}, {-.5, -1.5, 1}, {-.5, -1.5, -1}}]}, {3.5, -2, 0}], Translate[{Cone[], Yellow, Opacity[.9], Polygon[{{1, 1, .5}, {-1, 1, .5}, {-1, -1, .5}, {1, -1, .5}}]}, {7, -4, 0}]}, Boxed -> False, ViewAngle -> .24, ViewPoint -> {1.3, -2.4, 2}]-Graphics3D-Todas las recetas · Referencia de funciones · Usar esto desde un cliente MCP