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.
ArrayPlot /@ NestList[ArrayFlatten[# /. 1 -> {{1, 0}, {1, 1}}]&, {{1}}, 5]{-Graphics-, -Graphics-, -Graphics-, -Graphics-, -Graphics-, -Graphics-}Todas las recetas · Referencia de funciones · Usar esto desde un cliente MCP