A245540 Partial sums of A245180.

1, 2, 5, 6, 14, 17, 31, 32, 40, 48, 72, 75, 99, 113, 165, 166, 174, 182, 206, 214, 278, 302, 414, 417, 441, 465, 537, 551, 663, 715, 931, 932, 940, 948, 972, 980, 1044, 1068, 1180, 1188, 1252, 1316, 1508, 1532, 1724, 1836, 2252, 2255, 2279, 2303, 2375, 2399, 2591, 2663, 2999, 3013, 3125, 3237

Offset

1,2

Links

Altug Alkan, Table of n, a(n) for n = 1..16383

Index entries for sequences related to cellular automata

Formula

a(n) = (A245542(n) - 1)/8. - Omar E. Pol, Mar 07 2015

Mathematica

b[n_] := b[n] = Which[n == 1, 1, Mod[n, 2] == 0, b[n/2], Mod[n, 4] == 3, 2b[(n-1)/2] + b[n-2], True, 8b[(n-1)/4]];
Accumulate[Array[b, 58]] (* Jean-François Alcover, Oct 01 2018 *)

Crossrefs

Cf. A245180, A160239, A245542.

Sequence in context: A215147 A191229 A191120 * A211369 A006596 A000092

Adjacent sequences: A245537 A245538 A245539 * A245541 A245542 A245543

Keyword

nonn,look

Author

N. J. A. Sloane, Jul 26 2014

Status

approved