A119823 a(n) = a(n-1) + number of distinct digits of a(n-1) in decimal representation, a(0)=0.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 12, 14, 16, 18, 20, 22, 23, 25, 27, 29, 31, 33, 34, 36, 38, 40, 42, 44, 45, 47, 49, 51, 53, 55, 56, 58, 60, 62, 64, 66, 67, 69, 71, 73, 75, 77, 78, 80, 82, 84, 86, 88, 89, 91, 93, 95, 97, 99, 100, 102, 105, 108, 111, 112, 114, 116, 118, 120, 123

Offset

0,3

Links

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

Formula

a(n) = a(n-1) + A043537(a(n-1)).

Mathematica

nxt[n_]:=n+Length[Select[DigitCount[n], #!=0&]]
Prepend[NestList[nxt, 1, 80], 0]  (* Harvey P. Dale, Dec 26 2010 *)

Crossrefs

Cf. A043537.

Sequence in context: A343160 A190760 A067036 * A172432 A317622 A331400

Adjacent sequences: A119820 A119821 A119822 * A119824 A119825 A119826

Keyword

nonn,base

Author

Reinhard Zumkeller, May 25 2006

Status

approved