OFFSET
1,1
EXAMPLE
k=0: 2*0^2 + 0 + 2 = 0 + 0 + 2 = 2.
k=1: 2*1^2 + 1 + 2 = 2 + 1 + 2 = 5.
k=3: 2*3^2 + 3 + 2 = 18 + 3 + 2 = 23.
k=7: 2*7^2 + 7 + 2 = 98 + 7 + 2 = 107.
MATHEMATICA
Select[Table[2 n^2 + n + 2, {n, 0, 18000}], PrimeQ] (* Vincenzo Librandi, Nov 02 2014 *)
PROG
(PARI) for(k=0, 10^3, my(t=2*k^2+k+2); if(isprime(t), print1(t, ", "))); \\ Joerg Arndt, Nov 02 2014
(Magma) [a: n in [0..300] | IsPrime(a) where a is 2*n^2 + n + 2 ]; // Vincenzo Librandi, Nov 02 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Jon E. Schoenfield, Nov 02 2014
STATUS
approved