OFFSET
1,2
COMMENTS
All terms under 500 correspond to certified primes (Primo 2.2.0 beta). a(10) > 2500. - Ryan Propper, Apr 05 2006
a(11) > 10000. - Eric Snyder, Jun 03 2022
EXAMPLE
7 is in the sequence because 7^7*7! + 1 = 4150656721 is prime.
MATHEMATICA
Do[If[PrimeQ[n^n*n!+1], Print[n]], {n, 600}]
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Farideh Firoozbakht, Jul 14 2003
EXTENSIONS
a(9) from Ryan Propper, Apr 05 2006
a(10) from Eric Snyder, Jun 03 2022
STATUS
approved