A116954 Numbers n such that 3*n^3 + 1 is prime.

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

Robert Israel, Table of n, a(n) for n = 1..10000

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

Adjacent sequences: A116951 A116952 A116953 * A116955 A116956 A116957

Keyword

nonn,less

Author

Parthasarathy Nambi, Apr 20 2006

Extensions

More terms from Stefan Steinerberger, Apr 22 2006, Jul 22 2006

Status

approved