%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