A043559 Number of runs in base-7 representation of n.

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

Offset

0,8

Comments

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

Links

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

Mathematica

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

Crossrefs

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

Sequence in context: A368860 A297775 A043534 * A083165 A297776 A043535

Adjacent sequences: A043556 A043557 A043558 * A043560 A043561 A043562

Keyword

nonn,base

Author

Clark Kimberling

Status

approved