|
|
A062658
|
|
Numbers k such that 92^k - 91^k is prime.
|
|
0
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Terms greater than 1000 are often only strong pseudoprimes.
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[0, 10000], If[PrimeQ[#], PrimeQ[92^# - 91^#]] &] (* Robert Price, Aug 05 2015 *)
|
|
PROG
|
(PARI) is_ok(n)=isprime(92^n-91^n);
first(m)=my(v=vector(m), k=3); v[1]=3; for(i=2, m, while(!is_ok(k), k++); print1(k, ", "); v[i]=k; k++; ); v; /* Anders Hellström, Aug 05 2015 */
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,hard
|
|
AUTHOR
|
|
|
EXTENSIONS
|
a(4)-a(5) from Robert Price, Aug 05 2015 (Computer run by Adam Marciniec)
|
|
STATUS
|
approved
|
|
|
|