A142105 Primes congruent to 17 mod 36.

17, 53, 89, 197, 233, 269, 449, 521, 557, 593, 701, 773, 809, 881, 953, 1061, 1097, 1277, 1493, 1601, 1637, 1709, 1889, 1997, 2069, 2141, 2213, 2357, 2393, 2609, 2753, 2789, 2861, 2897, 2969, 3041, 3221, 3257, 3329, 3581, 3617, 3761, 3797, 3833, 4013, 4049

Offset

1,1

Links

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

Mathematica

Select[Range[17, 20000, 36], PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Jul 02 2011 *)
Select[Prime[Range[1500]], MemberQ[{17}, Mod[#, 36]]&] (* Vincenzo Librandi, Aug 19 2012 *)

Prog

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

Crossrefs

Cf. A000040.

Sequence in context: A285225 A044119 A044500 * A031383 A248697 A180456

Adjacent sequences: A142102 A142103 A142104 * A142106 A142107 A142108

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 11 2008

Status

approved