A297784 Number of distinct runs in base-16 digits of n.

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

Offset

1,16

Comments

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

Links

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

Example

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

Mathematica

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

Crossrefs

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

Sequence in context: A297783 A043542 A043567 * A043568 A043543 A237684

Adjacent sequences: A297781 A297782 A297783 * A297785 A297786 A297787

Keyword

nonn,base,easy

Author

Clark Kimberling, Feb 03 2018

Status

approved