A142110 - OEIS

%I #12 Sep 08 2022 08:45:35

%S 31,67,103,139,211,283,463,499,571,607,643,751,787,823,859,967,1039,

%T 1291,1327,1399,1471,1543,1579,1723,1759,1831,1867,2011,2083,2371,

%U 2551,2659,2731,2767,2803,3019,3163,3271,3307,3343,3559,3631,3739,3847,3919,4027

%N Primes congruent to 31 mod 36.

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

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

%t Select[Range[31,4100,36],PrimeQ] (* _Harvey P. Dale_, Nov 26 2011 *)

%t Select[Prime[Range[1500]],MemberQ[{31},Mod[#,36]]&] (* _Vincenzo Librandi_, Aug 19 2012 *)

%o (Magma) [p: p in PrimesUpTo(5000) | p mod 36 eq 31 ]; // _Vincenzo Librandi_, Aug 19 2012

%o (PARI) is(n)=isprime(n) && n%36==31 \\ _Charles R Greathouse IV_, Jul 02 2016

%Y Cf. A000040.

%K nonn,easy

%O 1,1

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