login
A272572
Primes of the form n^4 + n^3 + 1 with n positive.
2
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,1
LINKS
MATHEMATICA
Select[Table[n^4 + n^3 + 1, {n, 0, 170}], PrimeQ]
PROG
(Magma) [a: n in [0..200] | IsPrime(a) where a is n^4+n^3+1];
(PARI) lista(nn) = {for(n=1, nn, if(ispseudoprime(p=n^4+n^3+1), print1(p, ", "))); } \\ Altug Alkan, May 04 2016
CROSSREFS
KEYWORD
nonn,less
AUTHOR
Vincenzo Librandi, May 03 2016
STATUS
approved