A142049 Primes congruent to 1 mod 33.

67, 199, 331, 397, 463, 661, 727, 859, 991, 1123, 1321, 1453, 1783, 2113, 2179, 2311, 2377, 2707, 2971, 3037, 3169, 3301, 3433, 3499, 3631, 3697, 4027, 4093, 4159, 4357, 4423, 4621, 4951, 5281, 5347, 5413, 5479, 5743, 6007, 6073, 6271, 6337, 6469, 6733

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(7000) | p mod 33 eq 1 ]; // Vincenzo Librandi, Aug 18 2012

Mathematica

Select[Prime[Range[3000]],MemberQ[{1},Mod[#,33]]&] (* Vincenzo Librandi, Aug 18 2012 *)
Select[Range[1,6800,33],PrimeQ] (* Harvey P. Dale, May 07 2022 *)

PARI

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

Formula

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