%I #7 Aug 12 2020 01:29:21
%S 2,1,81,16,8748,91,1489347
%N Least m coprime to 11 minimizing A007947(m*(11^n-m)).
%C The values of the minima are given in A147798.
%o (PARI) /* If A147798(n) has already been computed and is stored in a147798[n]: */
%o A147805(n)={my(m=a147798[n]); for(a=1, n=11^n, a%11 || next; m>2*A007947(a) || next; m==A007947(a)*A007947(n-a) && return(a)) }
%o /* else use code from A147804 : A147805(n)=A147804(n,11) */
%Y Cf. A007947, A147298, A147798, A147799, A147800, A147801, A147802, A147803, A147804.
%K nonn,more
%O 1,1
%A _M. F. Hasler_, Dec 06 2008