A072485 n-th number that includes the substring [n] in its decimal expansion.

1, 12, 23, 34, 45, 56, 67, 78, 89, 108, 119, 129, 213, 314, 415, 516, 617, 718, 819, 920, 1021, 1220, 1223, 1240, 1251, 1262, 1273, 1284, 1295, 1306, 1317, 1328, 1433, 1349, 1435, 1536, 1637, 1738, 1839, 1940, 2041, 2142, 2243, 2441, 2445, 2460, 2471, 2482, 2493, 2504, 2515, 2526, 2537, 2548

Offset

1,2

Links

Robert Israel, Table of n, a(n) for n = 1..9999

Maple

N:= 100: count:= 0: R:= {$1..N}:
V:= Vector(N):
for n from 1 while count < N do
  Q:= map(proc(t) local i; seq(t mod 10^i, i=1..1+ilog10(t)) end proc,
    {seq(floor(n/10^i), i=0..ilog10(n))}) intersect R;
  for m in Q do
    V[m]:= V[m]+1;
    if V[m] = m then A[m]:= n; count:= count+1 fi
  od;
od:
seq(A[i], i=1..N); # Robert Israel, Sep 25 2019

Crossrefs

Leading diagonal of triangle defined in A072484.

Cf. A072483, A072484.

Sequence in context: A098953 A228157 A363820 * A035333 A001704 A127421

Adjacent sequences: A072482 A072483 A072484 * A072486 A072487 A072488

Keyword

base,nonn

Author

Amarnath Murthy, Jul 07 2002

Extensions

Corrected and extended by Robert Israel, Sep 25 2019

Status

approved