A199366 Numbers k such that 4*k^3-1 is prime.
1, 2, 3, 5, 6, 11, 12, 15, 18, 30, 32, 45, 48, 51, 63, 66, 87, 90, 98, 101, 113, 116, 122, 125, 132, 150, 153, 155, 156, 161, 170, 171, 173, 183, 195, 198, 203, 213, 233, 237, 243, 246, 260, 266, 282, 288, 291, 297, 300, 302, 305, 308, 321, 335, 341, 342, 347, 366, 371, 377, 381, 386, 393, 398, 401, 402, 407, 408, 411, 423, 425, 426, 437, 443, 452, 455, 456
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[n: n in [0..500] | IsPrime(4*n^3-1)]; // Vincenzo Librandi, Jan 07 2013
-
Mathematica
Select[Range[0, 1000], PrimeQ[4#^3 - 1]&] (* Vincenzo Librandi, Jan 07 2013 *)
-
PARI
is(n)=isprime(4*n^3-1) \\ Charles R Greathouse IV, May 22 2017
Comments