A142063 Primes congruent to 25 mod 33.
157, 223, 421, 487, 619, 751, 883, 1213, 1279, 1543, 1609, 1741, 1873, 2137, 2203, 2269, 2467, 2731, 2797, 3061, 3259, 3391, 3457, 3853, 3919, 4051, 4447, 4513, 4909, 5107, 5437, 5503, 5569, 5701, 6163, 6229, 6361, 6427, 6691, 6823, 7219, 7351, 7417, 7549
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A000040.
Programs
-
Magma
[p: p in PrimesUpTo(8000) | p mod 33 eq 25 ]; // Vincenzo Librandi, Aug 12 2012
-
Mathematica
Select[Range[25, 20000, 33], PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Jun 24 2011 *) Select[Prime[Range[1000]],MemberQ[{25},Mod[#,33]]&] (* Vincenzo Librandi, Aug 18 2012 *)
-
PARI
is(n)=isprime(n) && n%33==25 \\ Charles R Greathouse IV, Jul 02 2016
Formula
a(n) ~ 20n log n. - Charles R Greathouse IV, Jul 02 2016