A253082 Partial sums of A246595.

1, 2, 3, 7, 8, 9, 13, 22, 23, 24, 25, 29, 33, 37, 46, 62, 63, 64, 65, 69, 70, 71, 75, 84, 88, 92, 96, 112, 121, 130, 146, 171, 172, 173, 174, 178, 179, 180, 184, 193, 194, 195, 196, 200, 204, 208, 217, 233, 237, 241, 245, 261, 265, 269, 285, 321, 330, 339, 348, 384, 400, 416, 441, 477, 478, 479, 480, 484, 485, 486, 490, 499, 500

Offset

0,2

Links

N. J. A. Sloane, Table of n, a(n) for n = 0..8192

N. J. A. Sloane, On the Number of ON Cells in Cellular Automata, arXiv:1503.01168 [math.CO], 2015.

Mathematica

Table[Times @@ (Length[#]^2&) /@ Select[Split[IntegerDigits[n, 2]], #[[1]] == 1&], {n, 0, 72}] // Accumulate (* Jean-François Alcover, Dec 15 2018 *)

Crossrefs

Cf. A246595.

Sequence in context: A070752 A039582 A026310 * A123644 A246440 A332699

Adjacent sequences: A253079 A253080 A253081 * A253083 A253084 A253085

Keyword

nonn

Author

N. J. A. Sloane, Feb 05 2015

Status

approved