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

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 = 13; s[n_] := Length[Split[IntegerDigits[n, b]]];
Table[s[n], {n, 1, 200}]

Crossrefs

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

Sequence in context: A043564 A043539 A297781 * A043540 A297782 A043566

Adjacent sequences: A043562 A043563 A043564 * A043566 A043567 A043568

Keyword

nonn,base

Author

Clark Kimberling

Status

approved