OFFSET
1,1
COMMENTS
Terms greater than 1000 may correspond to strong pseudoprimes not yet proved to be prime.
a(8) > 20000. - Derek Orr, Sep 08 2014
a(9) > 10^5. - Robert Price, Oct 15 2015
MATHEMATICA
Select[Range[0, 100000], If[PrimeQ[#], PrimeQ[96^# - 95^#]] &] (* Robert Price, Oct 15 2015 *)
PROG
(PARI) for(n=1, 1e5, if (isprime(96^n - 95^n), print1(n", "))) \\ Altug Alkan, Oct 15 2015
CROSSREFS
KEYWORD
nonn,hard
AUTHOR
Mike Oakes, May 18 2001, May 19 2001
EXTENSIONS
a(7) from Derek Orr, Sep 08 2014
a(8) from Robert Price, Oct 15 2015
STATUS
approved