login
A114350
Primes of the form 2x^3 + x + 1.
0
19, 439, 1033, 2011, 3469, 5503, 8209, 21319, 27673, 43933, 78643, 170413, 221233, 250051, 314983, 351289, 476719, 524353, 1185493, 1557469, 2963203, 4000879, 4194433, 5256283, 5488141, 8503219, 9826171, 10536223, 10903729, 11664181
OFFSET
1,1
MATHEMATICA
Select[Table[2x^3+x+1, {x, 200}], PrimeQ] (* Harvey P. Dale, Jan 07 2011 *)
PROG
(PARI) g(n, k) = for(x=1, n, y=k*x^3+x+1; if(isprime(y), print1(y", ")))
CROSSREFS
Sequence in context: A121938 A291644 A108145 * A194730 A012506 A285398
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Feb 09 2006
STATUS
approved