A161008 Primes of the form 2*k^2 + 5939831.
5939831, 5939833, 5939839, 5939849, 5939863, 5939881, 5939903, 5939929, 5939959, 5939993, 5940169, 5940223, 5940343, 5940479, 5940553, 5940799, 5940889, 5940983, 5941081, 5941289, 5941399, 5942009, 5942569, 5942719, 5942873, 5943031, 5943193
Offset: 1
Keywords
Links
- Arkadiusz Wesolowski, Table of n, a(n) for n = 1..1000
- G. L. Honaker, Jr. and Chris Caldwell, Prime Curios! 5939831
- Eric Weisstein's World of Mathematics, Prime-Generating Polynomial
Programs
-
Magma
[2*n^2+5939831 : n in [0..41] | IsPrime(2*n^2+5939831)]; // Arkadiusz Wesolowski, Mar 03 2011
-
Mathematica
Select[Table[2*n^2 + 5939831, {n, 0, 41}], PrimeQ] (* Arkadiusz Wesolowski, Mar 03 2011 *) -
PARI
for(n=0, 41, if(isprime(x=(2*n^2+5939831)), print1(x, ", "))); \\ Arkadiusz Wesolowski, Mar 03 2011
-
PARI
isprime(vector(41, n, 2*n^2+5939831)) \\ Arkadiusz Wesolowski, Mar 03 2011