Create tables of results in parallel

示例 2 步，在同一个会话中按顺序运行。每一步都在引擎上执行过，下面的输出就是它实际产生的。

第 1 步

data = Select[ParallelTable[Graphics3D[{Cuboid /@ Position[CellularAutomaton[{n, {2, 1}, {1, 1, 1}}, {{{{1}}}, 0}, {{{8}}}], 1]}, Boxed -> False], {n, 2, 120, 2}], Length[#[[1, -1]]] > 3&];

无输出——这一步是在为下一步做准备。

第 2 步

GraphicsGrid[Partition[data, 7], Frame -> All, ImageSize -> Medium]

输出

-Graphics-

在 Qurak 上运行全部操作示例

用到的函数

CellularAutomaton Graphics3D GraphicsGrid Length ParallelTable Partition Position Select

Create tables of results in parallel

用到的函数

相关操作示例