A142512 - OEIS

%I #11 May 28 2024 14:56:43

%S 61,113,269,373,997,1049,1153,1361,1621,1777,1933,2089,2141,2297,2557,

%T 2609,2713,3181,3389,3701,4013,4273,4481,4637,4793,5209,5261,5417,

%U 5521,5573,6197,6301,6353,6977,7237,7393,7549,7757,8017,8069,8329,8537,8641,8693

%N Primes congruent to 9 mod 52.

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

%F a(n) ~ 24n log n. - _Charles R Greathouse IV_, Jul 03 2016

%t Select[Prime[Range[1300]], MemberQ[{9}, Mod[#, 52]] &] (* _Vincenzo Librandi_, Aug 29 2012 *)

%t Select[Range[9,9000,52],PrimeQ] (* _Harvey P. Dale_, May 28 2024 *)

%o (Magma) [p: p in PrimesUpTo(9000) | p mod 52 eq 9]; // _Vincenzo Librandi_, Aug 29 2012

%o (PARI) is(n)=isprime(n) && n%52==9 \\ _Charles R Greathouse IV_, Jul 03 2016

%Y Cf. A000040.

%K nonn,easy

%O 1,1

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