A082416 Parity of A073941(n).

1, 1, 1, 0, 1, 0, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 0, 0, 0, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 0, 1, 0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1

Offset: 1

Author

N. J. A. Sloane, based on a suggestion of Jeremy Gardiner, Apr 25 2003

Keywords

• nonn
• easy

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A073941, A005428.

Programs

Haskell

a082416 n = a082416_list !! (n-1)
a082416_list = map (`mod` 2) a073941_list
-- Reinhard Zumkeller, Oct 26 2011

PARI

u=1; for(n=2,150,v=ceil(u/2); u=v+u; print1(v%2,","))

Extensions

More terms from Benoit Cloitre, Apr 25 2003