Пример 1 шаг, выполняемый по порядку в одной сессии. Каждый шаг был выполнен на движке, и вывод ниже — то, что он дал.
ArrayPlot /@ NestList[ArrayFlatten[# /. 1 -> {{1, 0}, {1, 1}}]&, {{1}}, 5]{-Graphics-, -Graphics-, -Graphics-, -Graphics-, -Graphics-, -Graphics-}Все рецепты · Справочник функций · Использовать из MCP-клиента