A201307 Primes of the form k^3+4.
5, 31, 347, 733, 6863, 15629, 19687, 91129, 250051, 328513, 493043, 614129, 658507, 970303, 1092731, 1295033, 1520879, 1601617, 2146693, 2352641, 3048629, 4826813, 5359379, 6128491, 7414879, 8869747, 12977879, 21253937, 21717643
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..3000
Programs
-
Magma
[a: n in [0..800] | IsPrime(a) where a is n^3+4];
-
Mathematica
Select[Table[n^3+4,{n,0,7000}],PrimeQ]