%I #18 Sep 08 2022 08:45:34
%S 2,19,53,223,257,359,461,563,631,733,937,971,1039,1277,1447,1481,1549,
%T 1583,1753,1787,1889,2161,2297,2399,2467,2671,2909,3011,3079,3181,
%U 3623,3691,3793,3929,4099,4133,4201,4337,4507,4643,4813,5051,5119,5153,5323,5527
%N Primes of form 17*k + 2.
%H Vincenzo Librandi, <a href="/A140544/b140544.txt">Table of n, a(n) for n = 1..1000</a>
%F {2} UNION A142072. - _R. J. Mathar_, Jul 20 2008
%e 17*1 + 2 = 19;
%e 17*13 + 2 = 223.
%t Select[Range[2,5000,17],PrimeQ[#]&] (* _Vladimir Joseph Stephan Orlovsky_, Apr 03 2011*)
%o (Magma) [ p: p in PrimesUpTo(10000) | p mod 17 eq 2 ]; // _Vincenzo Librandi_, Apr 08 2011
%Y Cf. A092074.
%K nonn,easy
%O 1,1
%A _Juri-Stepan Gerasimov_, Jun 29 2008
%E Corrected and extended by _N. J. A. Sloane_, Jul 11 2008