login
A142104
Primes congruent to 13 mod 36.
2
13, 157, 193, 229, 337, 373, 409, 661, 733, 769, 877, 1021, 1093, 1129, 1201, 1237, 1381, 1453, 1489, 1597, 1669, 1741, 1777, 1993, 2029, 2137, 2281, 2389, 2677, 2713, 2749, 2857, 3001, 3037, 3109, 3181, 3217, 3253, 3361, 3433, 3469, 3541, 3613, 3793, 4153
OFFSET
1,1
LINKS
MATHEMATICA
Select[Range[13, 20000, 36], PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Jul 02 2011 *)
Select[Prime[Range[1500]], MemberQ[{13}, Mod[#, 36]]&] (* Vincenzo Librandi, Aug 19 2012 *)
PROG
(PARI) select(n->n%36==13, primes(1000)) \\ Charles R Greathouse IV, Jul 02, 2011
(Magma) [p: p in PrimesUpTo(5000) | p mod 36 eq 13 ]; // Vincenzo Librandi, Aug 19 2012
CROSSREFS
Cf. A000040.
Sequence in context: A170732 A360172 A250210 * A140020 A130868 A154414
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Jul 11 2008
STATUS
approved