A142840 - OEIS

%I #9 Sep 14 2022 15:33:09

%S 103,347,1201,1567,1811,1933,2543,2909,4007,4129,4373,4861,5227,5471,

%T 6203,6569,6691,7057,7789,8521,8887,9497,9619,11083,12547,12791,13523,

%U 14011,14621,16451,16573,17183,19013,19379,19501,19867,20233,20477,20599,22063

%N Primes congruent to 42 mod 61.

%H Vincenzo Librandi, <a href="/A142840/b142840.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Prime[Range[2700]], MemberQ[{42}, Mod[#, 61]] &] (* _Vincenzo Librandi_, Sep 05 2012 *)

%t Select[Range[42,23000,61],PrimeQ] (* _Harvey P. Dale_, Sep 14 2022 *)

%o (Magma) [p: p in PrimesUpTo(23000) | p mod 61 eq 42 ] ; // _Vincenzo Librandi_, Sep 05 2012

%Y Cf. A000040.

%K nonn,easy

%O 1,1

%A _N. J. A. Sloane_, Jul 11 2008