AggregationSystem | Example Notebook

Run outer totalistic code 4 for four steps:

In[1051]:=

[◼]	AggregationSystem

[<|"OuterTotalisticCode"4,"Dimension"2|>,CenterArray[1,{1,1}],4]

Out[1051]=

{{1,0},{1,0},{1,0},{0,1},{0,1}}

———

Run totalistic code 18 for 500 steps from a single 1 on a background of 0s:

In[1052]:=

ArrayPlot@

[◼]	AggregationSystem

[<|"TotalisticCode"18,"Dimension"2|>,CenterArray[1,{1,1}],500]

Out[1052]=

———

Use

RulePlot

to visualize an outer totalistic rule specification:

In[1053]:=

RulePlot[CellularAutomaton[<|"OuterTotalisticCode"466,"Dimension"2|>]]

Out[1053]=