A088549 Primes of the form x^5 + x^4 + x^3 + x^2 + x + 2.
2, 7, 3907, 19609, 66431, 4288307, 54066637, 71270179, 351925757, 512604457, 1178420167, 24065769961, 30763687627, 48616590079, 130674467449, 229898795029, 329720803007, 363825386107, 886352920147, 2479006804507
Offset: 1
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[ a: n in [0..400] | IsPrime(a) where a is n^5 + n^4 + n^3 + n^2 + n + 2]
-
Mathematica
Select[Table[Plus@@(x^Range[5])+2,{x,0,100}],PrimeQ] (* Harvey P. Dale, Jun 19 2021 *) -
PARI
polypn(n,p) = { for(x=1,n, if(p%2,y=2,y=1); for(m=1,p, y=y+x^m; ); if(isprime(y),print1(y",")); ) }