|
%I #17 Sep 08 2022 08:45:20
%S 2,4,6,8,10,18,20,24,30,32,34,44,46,48,50,52,58,68,72,74,76,78,80,94,
%T 96,104,106,122,128,132,134,146,148,158,162,164,172,178,186,192,200,
%U 204,208,214,226,230,232,240,254,256,258,262,268,270,276,278,286,292,296
%N Numbers n such that 3*n^2 + 49 is prime.
%H Harvey P. Dale, <a href="/A111082/b111082.txt">Table of n, a(n) for n = 1..1000</a>
%e If n=96 then (3*n^2) + 49 = 27697 (prime).
%t Select[Range[300],PrimeQ[3#^2+49]&] (* _Harvey P. Dale_, Sep 04 2019 *)
%o (Magma) [n: n in [0..300] | IsPrime(3*n^2+49)]; - _Vincenzo Librandi_, Nov 13 2010
%o (PARI) is(n)=isprime(3*n^2+49) \\ _Charles R Greathouse IV_, Jun 13 2017
%Y Cf. A111068, A111069.
%K nonn,easy
%O 1,1
%A _Parthasarathy Nambi_, Oct 11 2005
|
