OFFSET
0,2
COMMENTS
Starting with another "seed" than 0 would produce another sequence.
LINKS
Robert Israel, Table of n, a(n) for n = 0..10000
EXAMPLE
After 28 we must have an integer containing a "7" (2+"7"=9) or a "1" (8+"1"=9). The smallest integer satisfying this constraint is 31 (and not 37 or 41 or any other containing a "7" or a "1")
MAPLE
f:= proc(n) local S, k;
S:= map(t -> 9-t, convert(convert(n, base, 10), set));
for k from n+1 do
if convert(convert(k, base, 10), set) intersect S <> {} then return k fi
od
end proc:
a[0]:= 0:
for n from 1 to 100 do a[n]:= f(a[n-1]) od:
seq(a[n], n=0..100); # Robert Israel, Feb 24 2017
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Eric Angelini, Jun 09 2005
EXTENSIONS
Corrected and extended by Zak Seidov, Jun 10 2005
STATUS
approved