A043565 Number of runs in base-13 representation of n.

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2

Offset: 0

Author

Clark Kimberling

Keywords

• nonn
• base

Comments

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

Crossrefs

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

Programs

Mathematica

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