This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A252940 #3 Dec 26 2014 15:46:16 %S A252940 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 A252940 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 A252940 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1 %N A252940 Run lengths of A252939. %C A252940 a(113) = 2. %o A252940 (Haskell) %o A252940 import Data.List (group) %o A252940 a252940 n = a252940_list !! (n-1) %o A252940 a252940_list = map length $ group a252939_list %Y A252940 Cf. A252939, A252912, A251555, A098550. %K A252940 nonn %O A252940 1,12 %A A252940 _Reinhard Zumkeller_, Dec 25 2014