%I #5 Aug 13 2017 21:43:23
%S 6,82,996,9966,99922,999916,9999942,99999846,999999936,9999999726,
%T 99999999598,999999999576,9999999999658,99999999999928,
%U 999999999999576,9999999999999936,99999999999999456,999999999999999486
%N Largest n-digit member of A089699.
%p for d from 1 to 25 do for n from 10^d-1 by -1 to 10^(d-1) do m:=mul(j,j=convert(n,base,10)): if isprime(m+1) and isprime(n+1) then printf("%d, ",n): break fi od od: # C. Ronaldo
%Y Cf. A089699, A089700.
%K base,nonn
%O 1,1
%A _Amarnath Murthy_, Nov 10 2003
%E More terms from C. Ronaldo (aga_new_ac(AT)hotmail.com), Dec 25 2004