A064654 Length of n-th run of evens or odds in A064413.

1, 3, 2, 3, 2, 2, 2, 4, 3, 1, 2, 2, 2, 3, 2, 2, 3, 3, 2, 5, 2, 1, 2, 2, 2, 2, 2, 4, 3, 4, 3, 1, 1, 2, 2, 1, 2, 3, 2, 2, 1, 2, 2, 2, 2, 5, 3, 1, 2, 2, 2, 1, 2, 4, 2, 2, 3, 3, 2, 2, 3, 1, 2, 4, 1, 2, 3, 1, 2, 3, 3, 4, 2, 2, 3, 5, 1, 2, 2, 1, 1, 3, 3, 1, 2, 2, 2, 4, 2, 2, 5, 1, 1, 2, 3, 1, 1, 5, 2, 4, 1, 3, 3, 3, 1, 1

Offset

1,2

Comments

Also gives lengths of runs of zeros and ones in A195376.

Links

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

J. C. Lagarias, E. M. Rains and N. J. A. Sloane, The EKG sequence, Exper. Math. 11 (2002), 437-446.

Index entries for sequences related to EKG sequence

Prog

(Haskell)
import Data.List (group)
a064654 n = a064654_list !! (n-1)
a064654_list = map length $ group a195376_list
-- Reinhard Zumkeller, Sep 17 2001

Crossrefs

Cf. A064413, A064655, A065656.

Sequence in context: A262880 A249355 A355034 * A162229 A056564 A082844

Adjacent sequences: A064651 A064652 A064653 * A064655 A064656 A064657

Keyword

nonn,easy

Author

N. J. A. Sloane, Oct 09 2001

Extensions

More terms from Matthew Conroy, Oct 16 2001

Status

approved