Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #8 Sep 08 2022 08:45:37
%S 199,443,809,1297,1663,1907,2029,2273,3371,4591,4957,5323,5689,6299,
%T 6421,8861,9227,9349,10691,11057,11423,11789,12277,13009,13619,14107,
%U 14717,15083,15937,16547,17401,18133,18743,19231,19597,19841,19963,20939,21061,22037
%N Primes congruent to 16 mod 61.
%H Vincenzo Librandi, <a href="/A142814/b142814.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[2700]], MemberQ[{16}, Mod[#, 61]] &] (* _Vincenzo Librandi_, Sep 05 2012 *)
%t Select[Range[16, 23000, 61], PrimeQ] (* _Bruno Berselli_, Sep 05 2012 *)
%o (Magma) [p: p in PrimesUpTo(23000) | p mod 61 eq 16]; // _Vincenzo Librandi_, Sep 05 2012
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008