login
A082416
Parity of A073941(n).
3
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,1
LINKS
PROG
(PARI) u=1; for(n=2, 150, v=ceil(u/2); u=v+u; print1(v%2, ", "))
(Haskell)
a082416 n = a082416_list !! (n-1)
a082416_list = map (`mod` 2) a073941_list
-- Reinhard Zumkeller, Oct 26 2011
CROSSREFS
Sequence in context: A088025 A192687 A189141 * A093996 A323095 A336868
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, based on a suggestion of Jeremy Gardiner, Apr 25 2003
EXTENSIONS
More terms from Benoit Cloitre, Apr 25 2003
STATUS
approved