A272572 Primes of the form n^4 + n^3 + 1 with n positive.

3, 109, 751, 15973, 41161, 54001, 345601, 1543501, 1726273, 2372761, 3833281, 8039359, 10010113, 18125251, 25769593, 63447211, 75609559, 93178009, 147741001, 164490259, 170377561, 270532609, 432967681, 457483993, 509625001, 551562859, 596037313, 1055592001

Offset: 1

Author

Vincenzo Librandi, May 03 2016

Keywords

• nonn
• less

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A002383, A245488, A272571.

Programs

Magma

[a: n in [0..200] | IsPrime(a) where a is n^4+n^3+1];

Mathematica

Select[Table[n^4 + n^3 + 1, {n, 0, 170}], PrimeQ]

PARI

lista(nn) = {for(n=1, nn, if(ispseudoprime(p=n^4+n^3+1), print1(p, ", "))); } \\ Altug Alkan, May 04 2016