A065799 Numbers k such that k^k + k! + k^2 + k + 1 is prime.

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

Links

Table of n, a(n) for n=1..7.

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

Adjacent sequences: A065796 A065797 A065798 * A065800 A065801 A065802

Keyword

nonn

Author

Robert G. Wilson v, Dec 05 2001

Extensions

a(7) from Tyler NeSmith, May 04 2021

Status

approved