A043557 Number of runs in base-5 representation of n.

1, 1, 1, 1, 1, 2, 1, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 1, 2, 3, 3, 3, 3, 2, 1, 2, 2, 2, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 2, 2, 1, 2, 2, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3

Offset

0,6

Links

Table of n, a(n) for n=0..89.

Example

Every positive integers occurs infinitely many times.  See A297770 for a guide to related sequences.

Mathematica

b = 5; s[n_] := Length[Split[IntegerDigits[n, b]]];
Table[s[n], {n, 1, 200}]

Crossrefs

Cf. A297773 (number of distinct runs), A297770.

Sequence in context: A098396 A297773 A043532 * A055027 A214574 A342510

Adjacent sequences: A043554 A043555 A043556 * A043558 A043559 A043560

Keyword

nonn,base

Author

Clark Kimberling

Extensions

Updated by Clark Kimberling, Feb 03 2018

Status

approved