login
A161609
Primes of the form k! + k^3 + k^2 + k + 1.
0
2, 5, 17, 109
OFFSET
1,1
COMMENTS
The associated k are 0,1,2,4,... (and no further between 4 and 2020, i.e., the next prime has at least 5802 digits).
MATHEMATICA
lst={}; Do[p=n!+n^3+n^2+n+1; If[PrimeQ[p], AppendTo[lst, p]], {n, 0, 6!}]; lst
CROSSREFS
Sequence in context: A081546 A103511 A254132 * A228238 A174168 A097980
KEYWORD
nonn
AUTHOR
STATUS
approved