A142053 Primes congruent to 7 mod 33.

7, 73, 139, 271, 337, 601, 733, 997, 1063, 1129, 1327, 1459, 1657, 1723, 1789, 1987, 2053, 2251, 2383, 2647, 2713, 3109, 3307, 3373, 3571, 3637, 3769, 3967, 4099, 4231, 4297, 4363, 4561, 4759, 4957, 5023, 5419, 5683, 5749, 5881, 6079, 6211, 6277, 6343, 6607

Offset: 1

Author

N. J. A. Sloane, Jul 11 2008

Keywords

• nonn
• easy

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 7 ]; // Vincenzo Librandi, Aug 18 2012

Mathematica

Select[Range[7, 20000, 33], PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Jun 25 2011 *)
Select[Prime[Range[3000]],MemberQ[{7},Mod[#,33]]&] (* Vincenzo Librandi, Aug 18 2012 *)

PARI

is(n)=isprime(n) && n%33==7 \\ Charles R Greathouse IV, Jul 02 2016

Formula

a(n) ~ 20n log n. - Charles R Greathouse IV, Jul 02 2016