login
A253078
Total number of ON cells at stage n of two-dimensional 5-neighbor outer totalistic cellular automaton defined by "Rule 470".
4
1, 5, 8, 24, 21, 56, 32, 89, 65, 140, 96, 201, 149, 260, 200, 297, 293, 376, 368, 453, 461, 564, 532, 685, 665, 804, 764, 929, 913, 1052, 1060, 1145, 1177, 1296, 1405, 1405, 1404, 1672, 1521, 1845, 1696, 2052, 1909, 2217, 2152, 2416, 2361, 2529, 2644, 2776, 2813, 3053, 2908, 3316, 3093, 3461, 3512, 3792, 3713, 4021
OFFSET
0,2
COMMENTS
It would be nice to have a formula or recurrence.
REFERENCES
S. Wolfram, A New Kind of Science, Wolfram Media, 2002; pp. 173-175.
MATHEMATICA
Map[Function[Apply[Plus, Flatten[ #1]]], CellularAutomaton[{ 470, {2, {{0, 2, 0}, {2, 1, 2}, {0, 2, 0}}}, {1, 1}}, {{{1}}, 0}, 130]]
ArrayPlot /@ CellularAutomaton[{470, {2, {{0, 2, 0}, {2, 1, 2}, {0, 2, 0}}}, {1, 1}}, {{{1}}, 0}, 23]
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Feb 04 2015
STATUS
approved