OFFSET
1,1
COMMENTS
The numbers in the sequence are all even numbers.
For k = 11*m - 4, (k^4 + k^3 + k^2 + 1)/11 is an integer, so there is no number of the form k = 11*m - 4 in the sequence.
LINKS
Daniel Starodubtsev, Table of n, a(n) for n = 1..10000
EXAMPLE
2^4 + 2^3 + 2^2 + 1 = 29 is prime, so 2 is in the sequence.
MATHEMATICA
Select[Range[0, 1000], PrimeQ[#^4 + #^3 + #^2 + 1] &]
PROG
(PARI) for(n=1, 1000, if(ispseudoprime(n^4 + n^3 + n^2 + 1), print1(n, ", ")))
(Magma) [n: n in [0..700] |IsPrime(n^4 + n^3 + n^2 + 1)]; // Vincenzo Librandi, Sep 08 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Jinyuan Wang, Aug 12 2018
STATUS
approved