login
A065799
Numbers k such that k^k + k! + k^2 + k + 1 is prime.
0
1, 2, 6, 10, 126, 670, 794
OFFSET
1,2
COMMENTS
a(8) > 1300. - Tyler NeSmith, May 04 2021
a(8) > 3700. - Sean A. Irvine, Sep 19 2023
MATHEMATICA
Do[ If[ PrimeQ[ n^n + n! + n^2 + n + 1 ], Print[n]], {n, 1, 750} ]
PROG
(PARI) is(n)=ispseudoprime(n^n+n!+n^2+n+1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
Sequence in context: A124621 A325237 A358071 * A162582 A123098 A351716
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Dec 05 2001
EXTENSIONS
a(7) from Tyler NeSmith, May 04 2021
STATUS
approved