1,2

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Select[Range[0, 200], PrimeQ[4#^2+2#-1]&] (* Vincenzo Librandi, Sep 24 2012 *)

(MAGMA) [n: n in [0..150] | IsPrime(4*n^2+2*n-1)]; // Vincenzo Librandi, Sep 24 2012

Cf. A155737, A155738.

Sequence in context: A309960 A247935 A005233 * A074897 A090556 A223539

Adjacent sequences: A155733 A155734 A155735 * A155737 A155738 A155739

nonn,easy

Vincenzo Librandi, Jan 26 2009

Edited by N. J. A. Sloane, Jun 25 2010

approved