A026492 a(n) = t(3n), where t = A001285 (Thue-Morse sequence).

1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 2, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 2, 2, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1

Offset

0,8

Links

Michael De Vlieger, Table of n, a(n) for n = 0..10000

Michael Gilleland, Some Self-Similar Integer Sequences

Mathematica

Array[1 + Mod[DigitCount[3 #, 2, 1], 2] &, 105, 0] (* Michael De Vlieger, Oct 03 2019 *)

Prog

(PARI) a(n)=1+hammingweight(3*n)%2 \\ Charles R Greathouse IV, May 09 2016

Crossrefs

Cf. A001285, A026498, A026513.

Sequence in context: A158854 A119849 A246588 * A182284 A139551 A022931

Adjacent sequences: A026489 A026490 A026491 * A026493 A026494 A026495

Keyword

nonn

Author

Clark Kimberling

Extensions

Name and Pari adapted to match offset in A001285 by Sean A. Irvine, Oct 02 2019

Status

approved