A142688 - OEIS

%I #9 Jun 20 2024 13:44:06

%S 37,151,379,607,1063,1291,1747,1861,2089,2203,2659,2887,3001,3229,

%T 3343,3457,3571,4027,4483,4597,5167,5281,5623,5737,5851,6079,6421,

%U 6763,6991,7219,7333,7561,7789,8017,8929,9043,9157,9613,10069,10639,10753,10867,11437

%N Primes congruent to 37 mod 57.

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

%t Select[Prime[Range[2200]], MemberQ[{37}, Mod[#, 57]] &] (* _Vincenzo Librandi_, Sep 02 2012 *)

%t Select[Range[37,12000,57],PrimeQ] (* _Harvey P. Dale_, Jun 20 2024 *)

%o (Magma) [p: p in PrimesUpTo(12000) | p mod 57 eq 37 ]; // _Vincenzo Librandi_, Sep 02 2012

%Y Cf. A000040.

%K nonn,easy

%O 1,1

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