login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A142941
Primes congruent to 37 mod 64.
1
37, 101, 229, 293, 421, 613, 677, 997, 1061, 1381, 1637, 2213, 2341, 2789, 2917, 3109, 3301, 3557, 3877, 4133, 4261, 4517, 5413, 5477, 5669, 5861, 6053, 6373, 6949, 7013, 7333, 7589, 7717, 8101, 8293, 8677, 8741, 8933, 9829, 10597, 10789, 10853, 11173, 11621
OFFSET
1,1
LINKS
MATHEMATICA
lst={}; Do[p=Prime[n]; If[Mod[p, 64]==37, AppendTo[lst, p]], {n, 7!}]; lst (* Vladimir Joseph Stephan Orlovsky, Mar 02 2009 *)
Select[Prime[Range[1800]], MemberQ[{37}, Mod[#, 64]] &] (* Vincenzo Librandi, Sep 07 2012 *)
Select[Range[37, 12000, 64], PrimeQ] (* Harvey P. Dale, Mar 23 2019 *)
PROG
(Magma) [p: p in PrimesUpTo(12000) | p mod 64 eq 37]; // Vincenzo Librandi, Sep 07 2012
CROSSREFS
Cf. A000040.
Sequence in context: A044224 A044605 A130229 * A176973 A105019 A351141
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Jul 11 2008
STATUS
approved