|
%I #16 Sep 08 2022 08:45:50
%S 0,1,2,3,4,6,7,8,9,11,12,13,16,17,19,21,22,23,24,26,29,31,32,33,34,36,
%T 37,38,39,48,49,53,54,56,58,59,61,62,63,64,66,71,77,78,79,82,83,84,86,
%U 88,93,96,99,104,106,108,114,116,118,119,122,123,129,134,136
%N Numbers n such that 5+38*n^2 is a prime.
%D Legendre, Adrien-Marie: Zahlentheorie, (Maser H. transl.), Teubner Verlag, Leipzig 1893, No. 253, p. 326f.
%H Bruno Berselli, <a href="/A173552/b173552.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[0,150],PrimeQ[5+38#^2]&] (* _Harvey P. Dale_, Dec 27 2012 *)
%o (Magma) [n: n in [0..300] | IsPrime(5+38*n^2)]; // _Vincenzo Librandi_, Mar 10 2010
%Y Cf. A173553, A173554 (associated primes), A173555.
%K nonn,easy
%O 1,3
%A _Vincenzo Librandi_, Feb 21 2010
%E Offset corrected and entries recomputed by _Alonso del Arte_ and _N. J. A. Sloane_, Jun 18 2010
|
