OFFSET
1,1
COMMENTS
a(5) > 10^5. - Robert Price, May 11 2015
MATHEMATICA
Select[Prime[Range[PrimePi[1000]]], PrimeQ[87^# - 86^#] &] (* T. D. Noe, Aug 15 2012 *)
PROG
(PARI) is(n)=ispseudoprime(87^n-86^n) \\ Charles R Greathouse IV, Jun 06 2017
CROSSREFS
KEYWORD
nonn,hard
AUTHOR
Jean-Louis Charton, Aug 15 2012
EXTENSIONS
a(4) from Robert Price (computer run by Adam Marciniec), May 11 2015
STATUS
approved