Colorize connected components in complex structures

Пример 2 шагов, выполняемых по порядку в одной сессии. Каждый шаг был выполнен на движке, и вывод ниже — то, что он дал.

Шаг 1

Colorize[MorphologicalComponents[CellularAutomaton[30, {{1}, 0}, 101], CornerNeighbors -> False]]//Magnify

Вывод

Magnify[-Image-]

Шаг 2

Colorize[MorphologicalComponents[CellularAutomaton[30, {{1}, 0}, 10 ^ 3], CornerNeighbors -> False]]

Вывод

-Image-

Используемые функции