A142067 Primes congruent to 31 mod 33.
31, 97, 163, 229, 691, 757, 823, 1021, 1087, 1153, 1483, 1549, 1747, 1879, 2011, 2143, 2341, 2473, 2539, 2671, 2803, 3001, 3067, 3331, 3463, 3529, 3727, 3793, 4057, 4519, 4651, 4783, 5113, 5179, 5443, 5641, 5839, 6037, 6301, 6367, 6763, 6829, 6961, 7027
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 31 ]; // Vincenzo Librandi, Aug 18 2012
-
Mathematica
Select[Range[31, 20000, 33], PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Jun 24 2011 *) Select[Prime[Range[3000]],MemberQ[{31},Mod[#,33]]&] (* Vincenzo Librandi, Aug 18 2012 *)
-
PARI
is(n)=isprime(n) && n%33==31 \\ Charles R Greathouse IV, Jul 02 2016
Formula
a(n) ~ 20n log n. - Charles R Greathouse IV, Jul 02 2016