A252940 - OEIS

%I #3 Dec 26 2014 15:46:16

%S 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,

%T 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,

%U 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1

%N Run lengths of A252939.

%C a(113) = 2.

%o (Haskell)

%o import Data.List (group)

%o a252940 n = a252940_list !! (n-1)

%o a252940_list = map length $ group a252939_list

%Y Cf. A252939, A252912, A251555, A098550.

%K nonn

%O 1,12

%A _Reinhard Zumkeller_, Dec 25 2014