OFFSET
1,12
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..16384
MATHEMATICA
(Max[Length/@Split[IntegerDigits[#, 11]]])&/@Range[90] (* Harvey P. Dale, Jun 04 2013 *)
PROG
(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
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
More terms from Antti Karttunen, Nov 20 2017
STATUS
approved