ตัวอย่าง 1 ขั้นตอน รันตามลำดับในหนึ่งเซสชัน ทุกขั้นถูกรันกับเอนจินจริง และเอาต์พุตด้านล่างคือสิ่งที่มันให้
Graphics3D[Sphere[
Flatten[Table[{i, j, k}, {i, -2, 2}, {j, -2, 2}, {k, -2, 2}], 2], Flatten[Table[Mod[i + j, 2] * (1 - (k + 2) / 4), {i, -2, 2}, {j, -2, 2}, {k, -2, 2}], 2]]]-Graphics3D-สูตรงานทั้งหมด · เอกสารอ้างอิงฟังก์ชัน · ใช้สิ่งนี้จากไคลเอนต์ MCP