|
%I #11 Sep 08 2022 08:45:11
%S 1,4,6,10,12,18,22,28,40,42,46,52,54,64,70,78,84,88,90,94,96,112,120,
%T 130,132,136,138,142,154,160,174,216,222,226,232,238,240,276,282,288,
%U 292,294,306,310,316,328,336,358,360,370,396,400,408,424,436,438,466
%N Numbers n such that 1-2n+3n^2 is prime.
%H Vincenzo Librandi, <a href="/A086298/b086298.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[0, 600], PrimeQ[1 - 2*# + 3*#^2]&] (* _Vincenzo Librandi_, Jan 08 2013 *)
%o (Magma) [n: n in [0..550] | IsPrime(1-2*n+3*n^2)]; // _Vincenzo Librandi_, Jan 08 2013
%o (PARI) is(n)=isprime(1-2*n+3*n^2) \\ _Charles R Greathouse IV_, Jun 12 2017
%K easy,nonn
%O 1,2
%A _Zak Seidov_, Aug 28 2003
|
