A100698 Primes of the form k^3 - k + 1.
7, 61, 211, 337, 991, 1321, 2731, 3361, 6841, 9241, 10627, 15601, 17551, 29761, 42841, 59281, 68881, 74047, 91081, 124951, 140557, 157411, 185137, 238267, 421801, 456457, 592621, 614041, 658417, 728911, 778597, 857281, 970201, 1030201, 1061107, 1190911, 1367521
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
- Marie Euler and Christophe Petit, Expanding the use of quasi-subfield polynomials, arXiv:1909.11326 [cs.CR], 2019.
Programs
-
Magma
[ a: n in [0..400] | IsPrime(a) where a is n^3 - n +1]; // Vincenzo Librandi, Nov 17 2010
-
Mathematica
Select[Table[n^3-n+1,{n,0, 1500}],PrimeQ] (* Vincenzo Librandi, Jul 18 2012 *)
Formula
Extensions
Inaccurate comment removed by D. S. McNeil, Nov 17 2010