|
|
A062662
|
|
Numbers k such that 96^k - 95^k is prime.
|
|
0
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Terms greater than 1000 may correspond to strong pseudoprimes not yet proved to be prime.
|
|
LINKS
|
|
|
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
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|