A178438 Numbers n such that 10^n - 83 is prime.
2, 6, 16, 42, 47, 62, 109, 191, 221, 509, 3671, 4229, 4886, 6967, 12086
Offset: 1
Examples
10^6 - 83 = 999917 which is a prime number.
Links
Programs
-
Mathematica
nMax=1000; Do[If[PrimeQ[10^n-83], Print[n]], {n, nMax}]
-
PARI
is(n)=ispseudoprime(10^n-83) \\ Charles R Greathouse IV, Jun 13 2017
Extensions
Example corrected by Patrick De Geest, Nov 28 2014
Comments