OFFSET
1,1
COMMENTS
Next term, if it exists, is bigger than 3000. - Stefan Steinerberger, Feb 12 2006
EXAMPLE
If n=3 then 10^n - 113 = 887 (prime).
If n=31 then 10^n - 113 = 9999999999999999999999999999887 (prime).
MATHEMATICA
For[n=1, n<3000, n++, If[PrimeQ[10^n-113], Print[n]]] (* Stefan Steinerberger, Feb 12 2006 *)
PROG
(PARI) is(n)=ispseudoprime(10^n-113) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
hard,more,nonn
AUTHOR
Parthasarathy Nambi, Jul 06 2005
EXTENSIONS
a(6)-a(13) from Stefan Steinerberger, Feb 12 2006
a(14)-a(16) from Ryan Propper, Jan 09 2008
a(17) from Michael S. Branicky, Apr 01 2023
a(18)-a(23) from Michael S. Branicky, Oct 29 2024
STATUS
approved