A051066 Partial sums of A051065.

0, 1, 1, 1, 2, 2, 2, 3, 3, 4, 4, 5, 6, 6, 7, 8, 8, 9, 9, 10, 10, 10, 11, 11, 11, 12, 12, 12, 13, 13, 13, 14, 14, 14, 15, 15, 16, 16, 17, 18, 18, 19, 20, 20, 21, 21, 22, 22, 22, 23, 23, 23, 24, 24, 24, 25, 25, 25, 26, 26, 26, 27, 27, 28, 28, 29, 30, 30, 31, 32, 32, 33, 33, 34, 34

Offset: 0

Author

N. J. A. Sloane and Gary W. Adamson

Keywords

• nonn
• easy

References

• Letter from Gary W. Adamson concerning Prouhet-Thue-Morse sequence, Nov. 11, 1999.

Crossrefs

Cf. A004128, A051065, A051067.

Programs

Mathematica

Accumulate[Join[{0}, Mod[Accumulate[Table[IntegerExponent[3*n, 3], {n, 1, 100}]], 2]]] (* Amiram Eldar, Jun 02 2025 *)

Formula

a(n) = Sum_{k=0..n} A051065(k). - Wesley Ivan Hurt, May 25 2024

Extensions

More terms from James Sellers, Dec 11 1999