OFFSET
0,2
COMMENTS
Starting with another integer as 0 (the "seed") would lead to another sequence.
LINKS
Michael S. Branicky, Table of n, a(n) for n = 0..10000
EXAMPLE
After 100 we get 101 (and not 1000) because the lone 0 in "101" is considered as the copy of both zeros of "100".
MAPLE
R:= 0: S:= {0}: count:= 1;
for k from 1 while count < 100 do
Sk:= convert(convert(k, base, 10), set);
if S subset Sk then
R:= R, k;
count:= count+1;
S:= Sk;
fi
od:
R; # Robert Israel, Nov 21 2022
PROG
(Python)
from itertools import islice
def agen(an=0):
while True:
yield an
target, k = set(str(an)), an + 1
while not (target <= set(str(k))): k += 1
an = k
print(list(islice(agen(), 41))) # Michael S. Branicky, Nov 21 2022
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Eric Angelini, Jun 09 2005
EXTENSIONS
Missing terms a(35)-a(37) inserted by Michael S. Branicky, Nov 21 2022
STATUS
approved