login
A116954
Numbers n such that 3*n^3 + 1 is prime.
5
4, 10, 14, 16, 18, 20, 30, 36, 38, 48, 54, 58, 64, 70, 74, 86, 96, 106, 120, 140, 150, 154, 166, 170, 174, 176, 180, 200, 230, 234, 244, 260, 266, 268, 288, 296, 300, 304, 306, 308, 324, 330, 338, 340, 346, 348, 368, 384, 388, 394, 396, 406, 408, 434, 438, 440
OFFSET
1,1
COMMENTS
All terms are even. - Robert Israel, Jan 24 2018
LINKS
EXAMPLE
If n=48 then 3*n^3 + 1 = 331777 (prime).
MAPLE
select(n -> isprime(3*n^3+1), [seq(i, i=2..1000, 2)]); # Robert Israel, Jan 24 2018
MATHEMATICA
Select[Range[2000], PrimeQ[3#^3 + 1] &] (* Stefan Steinerberger, Apr 22 2006 *)
Select[Range[2, 500], PrimeQ[3#^3 + 1] &] (* Stefan Steinerberger, Jul 22 2006 *)
PROG
(Magma) [ n: n in [0..500] | IsPrime(3*n^3 + 1) ] // Vincenzo Librandi, Jan 31 2011
(PARI) is(n)=isprime(3*n^3+1) \\ Charles R Greathouse IV, Feb 20 2017
CROSSREFS
Cf. A089001.
Sequence in context: A103044 A310360 A114719 * A102686 A359171 A310361
KEYWORD
nonn,less
AUTHOR
Parthasarathy Nambi, Apr 20 2006
EXTENSIONS
More terms from Stefan Steinerberger, Apr 22 2006, Jul 22 2006
STATUS
approved