A043285 Maximal run length in base 11 representation of n.

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

Offset: 1

Author

Clark Kimberling

Keywords

• nonn
• base

Links

• Antti Karttunen, Table of n, a(n) for n = 1..16384

Crossrefs

Cf. A043276-A043290 for base-2 to base-16 analogs.

Programs

Mathematica

(Max[Length/@Split[IntegerDigits[#,11]]])&/@Range[90] (* Harvey P. Dale, Jun 04 2013 *)

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

Extensions

More terms from Antti Karttunen, Nov 20 2017