A142108 Primes congruent to 25 mod 36.
61, 97, 241, 277, 313, 349, 421, 457, 601, 673, 709, 853, 997, 1033, 1069, 1213, 1249, 1321, 1429, 1609, 1753, 1789, 1861, 1933, 2113, 2221, 2293, 2437, 2473, 2617, 2689, 2797, 2833, 3049, 3121, 3229, 3301, 3373, 3517, 3697, 3733, 3769, 3877, 4021, 4057
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A000040.
Programs
-
Magma
[p: p in PrimesUpTo(5000) | p mod 36 eq 25 ]; // Vincenzo Librandi, Aug 19 2012
-
Mathematica
Select[Range[25, 20000, 36], PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Jul 02 2011 *) Select[Prime[Range[1500]],MemberQ[{25},Mod[#,36]]&] (* Vincenzo Librandi, Aug 19 2012 *)
-
PARI
select(n->n%35==25,primes(1000)) \\ Charles R Greathouse IV, Jul 02 2011