login
A215538
Numbers n such that 101^n - 100^n is prime.
2
43, 59, 661, 1597, 3853, 6073, 7723, 12097
OFFSET
1,1
COMMENTS
Terms found by Mike Oakes. No more term <= 10000.
MATHEMATICA
Select[Prime[Range[PrimePi[1000]]], PrimeQ[101^# - 100^#] &] (* T. D. Noe, Aug 15 2012 *)
PROG
(PARI) is(n)=ispseudoprime(101^n-100^n) \\ Charles R Greathouse IV, Jun 06 2017
CROSSREFS
Sequence in context: A201613 A115404 A033223 * A235149 A064508 A102540
KEYWORD
nonn,hard
AUTHOR
Jean-Louis Charton, Aug 15 2012
EXTENSIONS
a(8) from Tim Johannes Ohrtmann, Jan 28 2018
STATUS
approved