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 A043285 #13 Nov 20 2017 05:35:12 %S A043285 1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1, %T A043285 1,2,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1, %U A043285 1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1 %N A043285 Maximal run length in base 11 representation of n. %H A043285 Antti Karttunen, <a href="/A043285/b043285.txt">Table of n, a(n) for n = 1..16384</a> %t A043285 (Max[Length/@Split[IntegerDigits[#,11]]])&/@Range[90] (* _Harvey P. Dale_, Jun 04 2013 *) %o A043285 (PARI) A043285(n, b=11){=my(m, c=1); while(n>0, n%b==(n\=b)%b&&c++&&next; m=max(m, c); c=1); m} \\ - M. F. Hasler, Jul 23 2013 %Y A043285 Cf. A043276-A043290 for base-2 to base-16 analogs. %K A043285 nonn,base %O A043285 1,12 %A A043285 _Clark Kimberling_ %E A043285 More terms from _Antti Karttunen_, Nov 20 2017