login
A038378
Integers which have more distinct digits than any smaller number.
6
0, 10, 102, 1023, 10234, 102345, 1023456, 10234567, 102345678, 1023456789
OFFSET
1,2
COMMENTS
Or: Smallest number with exactly n distinct digits. - M. F. Hasler, May 04 2017
MATHEMATICA
Prepend[NestList[FromDigits[Append[IntegerDigits[#], Last[Union[IntegerDigits[#]]]+1]]&, 10, 8], 0] (* Ivan N. Ianakiev, May 10 2015 *)
Join[{0}, Table[FromDigits[PadRight[{1, 0}, n, {1, 0, 2, 3, 4, 5, 6, 7, 8, 9}]], {n, 2, 10}]] (* Harvey P. Dale, Sep 27 2016 *)
PROG
(PARI) A038378(n)=sum(i=1, n--, 10^(n-i)*if(i>1, i, 10)) \\ M. F. Hasler, May 04 2017
CROSSREFS
KEYWORD
nonn,fini,full,base,nice
EXTENSIONS
Offset fixed by Reinhard Zumkeller, Aug 25 2009
STATUS
approved