A272571 Primes of the form n^4 + n + 1 with n positive.
3, 19, 631, 1303, 6571, 14653, 20749, 38431, 331801, 457003, 1048609, 1679653, 3748141, 4879729, 12960061, 22667191, 26873929, 29986651, 35153119, 62742331, 65610091, 108243319, 131079709, 200534041, 252047503, 294500053, 454372003, 466949029, 639129121
Offset: 1
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[a: n in [0..200] | IsPrime(a) where a is n^4+n+1];
-
Mathematica
Select[Table[n^4 + n + 1, {n, 100}], PrimeQ]
-
PARI
lista(nn) = {for(n=1, nn, if(ispseudoprime(p=n^4+n+1), print1(p, ", "))); } \\ Altug Alkan, May 04 2016