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
Examples
Every positive integers occurs infinitely many times. See A297770 for a guide to related sequences.
Programs
-
Mathematica
b = 5; s[n_] := Length[Split[IntegerDigits[n, b]]]; Table[s[n], {n, 1, 200}]
Extensions
Updated by Clark Kimberling, Feb 03 2018