OFFSET
0,3
MATHEMATICA
{0}~Join~Accumulate@ Map[Plus @@ Flatten@ # &, CellularAutomaton[{686, {2, {{0, 2, 0}, {2, 1, 2}, {0, 2, 0}}}, {1, 1}}, {{{1}}, 0}, 43]] (* A272928: Michael De Vlieger, May 11 2016, after Nadia Heninger and N. J. A. Sloane at A147562 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Robert Price, May 10 2016
STATUS
approved