login
A147805
Least m coprime to 11 minimizing A007947(m*(11^n-m)).
2
2, 1, 81, 16, 8748, 91, 1489347
OFFSET
1,1
COMMENTS
The values of the minima are given in A147798.
PROG
(PARI) /* If A147798(n) has already been computed and is stored in a147798[n]: */
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)) }
/* else use code from A147804 : A147805(n)=A147804(n, 11) */
KEYWORD
nonn,more
AUTHOR
M. F. Hasler, Dec 06 2008
STATUS
approved