|
|
A100840
|
|
Primes of the form n^n + 4.
|
|
2
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
a(5) = 2569^2569 + 4 (8760 digits long).
a(6) > 15000^15000 + 4. (End)
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Table[n^n+4, {n, 50}], PrimeQ] (* Harvey P. Dale, Oct 09 2020 *)
|
|
PROG
|
(PARI) f1(n, a) = for(x=0, n, y=x^x+a; if(ispseudoprime(y), print1(y", ")))
|
|
CROSSREFS
|
|
|
KEYWORD
|
hard,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|