login
A246316
Total number of ON cells at stage n of two-dimensional 5-neighbor outer totalistic cellular automaton defined by "Rule 452".
16
1, 4, 5, 12, 8, 24, 25, 40, 33, 44, 40, 88, 77, 100, 121, 176, 137, 164, 141, 204, 217, 288, 309, 384, 353, 404, 401, 508, 513, 564, 601, 724, 701, 672, 729, 824, 849, 964, 981, 1168, 1129, 1124, 1113, 1268, 1341, 1424, 1497, 1644, 1625, 1664, 1653, 1856, 1869, 2016, 2037, 2256, 2221, 2316, 2329, 2548, 2589, 2924
OFFSET
0,2
COMMENTS
Also "Rule 460".
Rules that produce this sequence: 324, 332, 356, 364, 452, 460, 484, 492, 836, 844, 868, 876, 964, 972, 996, 1004. - Robert Price, Apr 02 2016
REFERENCES
S. Wolfram, A New Kind of Science, Wolfram Media, 2002; pp. 173-175.
MATHEMATICA
Map[Function[Apply[Plus, Flatten[ #1]]], CellularAutomaton[{ 452, {2, {{0, 2, 0}, {2, 1, 2}, {0, 2, 0}}}, {1, 1}}, {{{1}}, 0}, 130]]
ArrayPlot /@ CellularAutomaton[{452, {2, {{0, 2, 0}, {2, 1, 2}, {0, 2, 0}}}, {1, 1}}, {{{1}}, 0}, 23]
CROSSREFS
Sequence in context: A067371 A068719 A191161 * A344372 A034773 A323766
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Aug 27 2014
STATUS
approved