%I #7 Jan 30 2017 21:46:38

%S 9,9,8,9,9,7,9,9,8,99,98,97,99,99,98,99,99,97,99,99,97,97,99,97,99,99,

%T 98,99,99,97,99,99,98,99,99,97,99,99,98,99,99,97,99,97,98,99,99,97,99,

%U 99,98,99,99,97,98,99,98,99,99,97,99,99,97,99,99,97,99,99,98,99,99,97

%N Largest k-digit number coprime to n, where k is the number of digits in n.

%H Robert Israel, <a href="/A109942/b109942.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) >= n+1 unless n is in A002283, in which case a(n)=n-1. - _Robert Israel_, Jan 30 2017

%p f:= proc(n) local k;

%p for k from 10^(1+ilog10(n))-1 by -1 do

%p if igcd(n,k) = 1 then return k fi

%p od

%p end proc:

%p map(f, [$1..100]); # _Robert Israel_, Jan 30 2017

%K base,easy,nonn

%O 1,1

%A _Amarnath Murthy_, Jul 19 2005

%E More terms from _David Wasserman_, Jul 19 2005