login
A195376
Parity of EKG sequence A064413.
6
1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 1, 1, 0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1, 1, 0, 0, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0, 0, 1, 1, 0, 1, 1, 0
OFFSET
1
COMMENTS
Characteristic function of odd terms in A064413: a(A064957(n)) = 1 and a(A064953(n)) = 0;
A064654 gives lengths of runs of zeros and ones.
FORMULA
a(n) = A064413(n) mod 2.
a(n) = A000035(A064413(n)). - Omar E. Pol, Oct 28 2013
PROG
(Haskell)
a195376 n = a195376_list !! (n-1)
a195376_list = map (`mod` 2) a064413_list
-- Reinhard Zumkeller, Sep 17 2001
CROSSREFS
Sequence in context: A369653 A120528 A287663 * A164950 A068433 A266895
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Sep 17 2011
STATUS
approved