A142181 Primes congruent to 37 mod 39.

37, 193, 271, 349, 661, 739, 1051, 1129, 1597, 1753, 1831, 1987, 2143, 2221, 2377, 2689, 2767, 3001, 3079, 3313, 3391, 3469, 3547, 4093, 4327, 4483, 4561, 4639, 4951, 5107, 5419, 5653, 6043, 6121, 6199, 6277, 6823, 7057, 7213, 7369, 7603, 7681, 7759, 7993

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

Select[Range[37, 20000, 39], PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Jul 02 2011 *)
Select[Prime[Range[3000]], MemberQ[{37}, Mod[#, 39]]&] (* Vincenzo Librandi, Aug 20 2012 *)

Prog

(PARI) select(n->n%39==37, primes(1000)) \\ Charles R Greathouse IV, Jul 02, 2011
(Magma) [p: p in PrimesUpTo(10000) | p mod 39 eq 37]; // Vincenzo Librandi, Aug 20 2012

Crossrefs

Cf. A000040.

Sequence in context: A164940 A137724 A172080 * A107196 A140027 A109320

Adjacent sequences: A142178 A142179 A142180 * A142182 A142183 A142184

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 11 2008

Status

approved