A098779 Smallest number not occurring earlier having in its decimal representation no digit in common with n.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 20, 30, 22, 23, 24, 25, 26, 27, 28, 11, 33, 10, 14, 13, 16, 15, 18, 17, 31, 12, 29, 19, 21, 50, 40, 41, 42, 44, 45, 32, 35, 36, 51, 37, 38, 39, 52, 53, 55, 34, 43, 46, 47, 60, 48, 49, 61, 62, 63, 54, 57, 58, 59, 70, 71, 72, 80, 73, 74, 56, 64, 65, 66

Offset

1,3

Comments

As Luc Kumps pointed out in the < rec.puzzles > forum (30/09/2004): This is *very* similar to A096779 (only difference being that you start at "0" - A096779 starts at "1").

This sequence stops with a(123456788). Could someone compute this last term?

Links

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

Maple

A[1]:= 0: Used[0]:= true:
for n from 2 to 100 do
  S:= convert(convert(n, base, 10), set);
  k:= 1:
  do
    while Used[k] = true do k:= k+1 od:
    L:= convert(k, base, 10);
    v:= select(t -> member(L[t], S), [$1..nops(L)]);
    if v = [] then A[n]:= k; Used[k]:= true; break fi;
    k:= k + 10^(v[-1]-1) - (k mod 10^(v[-1]-1));
  od;
od:
seq(A[n], n=1..100); # Robert Israel, Nov 28 2016

Crossrefs

Sequence in context: A217489 A217491 A122619 * A276822 A326106 A180412

Adjacent sequences: A098776 A098777 A098778 * A098780 A098781 A098782

Keyword

easy,nonn,base,fini,look

Author

Eric Angelini, Oct 04 2004

Extensions

Keyword fini added and offset corrected by Rick L. Shepherd, Nov 28 2016

Status

approved