OFFSET
1,1
COMMENTS
All terms are even. - Altug Alkan, Dec 13 2015
EXAMPLE
2 is in the sequence because 2^5 + 2^4 + 2^3 + 2^2 + 2 - 1 = 61 is prime.
MATHEMATICA
Select[Range[700], PrimeQ[Total[#^Range[1, 5, 1]] - 1] &]
PROG
(Magma) [n: n in [0..700] | IsPrime(s) where s is n^5+n^4+n^3+n^2+n-1];
(PARI) print1(2, ", "); forcomposite(n=1, 1e4, if(ispseudoprime(n^5 + n^4 + n^3 + n^2 + n - 1), print1(n, ", "))) \\ Altug Alkan, Dec 13 2015
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Dec 13 2015
STATUS
approved