OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[0, 200], PrimeQ[4#^2+2#-1]&] (* Vincenzo Librandi, Sep 24 2012 *)
PROG
(Magma) [n: n in [0..150] | IsPrime(4*n^2+2*n-1)]; // Vincenzo Librandi, Sep 24 2012
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Jan 26 2009
EXTENSIONS
Edited by N. J. A. Sloane, Jun 25 2010
STATUS
approved