0,3

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

Select[Range[0, 150], PrimeQ[4#^2+4#+653]&] (* Harvey P. Dale, Apr 02 2011 *)

(MAGMA) [n: n in [0..250] | IsPrime(4*n^2+4*n+653)]; // Vincenzo Librandi, Apr 01 2011

Cf. A145202 (primes produced by n).

Sequence in context: A291149 A322463 A275156 * A146295 A123719 A113221

Adjacent sequences: A188456 A188457 A188458 * A188460 A188461 A188462

nonn,easy

Vincenzo Librandi, Apr 01 2011

approved