|
|
A072485
|
|
n-th number that includes the substring [n] in its decimal expansion.
|
|
2
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
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:
|
|
CROSSREFS
|
Leading diagonal of triangle defined in A072484.
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|