A297783 Number of distinct runs in base-15 digits of n.

1, 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, 2, 2, 1, 2, 2, 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, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2

Offset

1,15

Comments

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

Starts to differ from A043542 at n=3391. - R. J. Mathar, Jul 24 2023

Links

Clark Kimberling, Table of n, a(n) for n = 1..10000

Example

12153600 in base-15: 1,1,0,1,1,0,0; four runs, of which 3 are distinct, so that a(12153600) = 3.

Mathematica

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

Crossrefs

Cf. A043567 (number of runs, not necessarily distinct), A297770.

Sequence in context: A297782 A043566 A043541 * A043542 A043567 A297784

Adjacent sequences: A297780 A297781 A297782 * A297784 A297785 A297786

Keyword

nonn,base,easy

Author

Clark Kimberling, Feb 03 2018

Status

approved