A258383 Run lengths of consecutive identical terms in A062234.

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

Offset

1,1

Comments

a(A258437(n)) = n and a(m) != n for m < A258437(n).

Links

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

Example

See A258432.

Prog

(Haskell)
import Data.List (group)
a258383 n = a258383_list !! (n-1)
a258383_list = map length $ group a062234_list

Crossrefs

Cf. A062234, A258432, A258437.

Sequence in context: A102677 A145884 A030368 * A037805 A327144 A327051

Adjacent sequences: A258380 A258381 A258382 * A258384 A258385 A258386

Keyword

nonn

Author

Reinhard Zumkeller, May 31 2015

Status

approved