A142052 Primes congruent to 5 mod 33.
5, 71, 137, 269, 401, 467, 599, 797, 863, 929, 1061, 1193, 1259, 1523, 1721, 1787, 2381, 2447, 2579, 2711, 2777, 2843, 2909, 3041, 3371, 3701, 3767, 3833, 4229, 4493, 4691, 4889, 5021, 5087, 5153, 5351, 5417, 5483, 5813, 5879, 6011, 6143, 6473, 6737, 6803
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[p: p in PrimesUpTo(8000) | p mod 33 eq 5 ]; // Vincenzo Librandi, Aug 18 2012
-
Mathematica
Select[Range[5, 20000, 33], PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Jun 25 2011 *) Select[Prime[Range[3000]],MemberQ[{5},Mod[#,33]]&] (* Vincenzo Librandi, Aug 18 2012 *)
-
PARI
is(n)=isprime(n) && n%33==5 \\ Charles R Greathouse IV, Jul 03 2016
Formula
a(n) ~ 20n log n. - Charles R Greathouse IV, Jul 03 2016