A252940 Run lengths of A252939.

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 17, 2, 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1

Offset

1,12

Comments

a(113) = 2.

Links

Table of n, a(n) for n=1..86.

Prog

(Haskell)
import Data.List (group)
a252940 n = a252940_list !! (n-1)
a252940_list = map length $ group a252939_list

Crossrefs

Cf. A252939, A252912, A251555, A098550.

Sequence in context: A333138 A051311 A040287 * A283894 A016735 A034059

Adjacent sequences: A252937 A252938 A252939 * A252941 A252942 A252943

Keyword

nonn

Author

Reinhard Zumkeller, Dec 25 2014

Status

approved