A142949 Primes congruent to 53 mod 64.

53, 181, 373, 757, 821, 1013, 1973, 2293, 2357, 2549, 2677, 2741, 3061, 3253, 3637, 3701, 4021, 4597, 4789, 5237, 5557, 5749, 5813, 6133, 6197, 6389, 6581, 6709, 7349, 7477, 7541, 7669, 8053, 8117, 8501, 8629, 8693, 8821, 9013, 9397, 9461, 9781, 9973, 10037

Offset

1,1

Links

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

Mathematica

lst={}; Do[p=Prime[n]; If[Mod[p, 64]==53, AppendTo[lst, p]], {n, 7!}]; lst (* Vladimir Joseph Stephan Orlovsky, Mar 02 2009 *)
Select[Prime[Range[1700]], MemberQ[{53}, Mod[#, 64]] &] (* Vincenzo Librandi, Sep 07 2012 *)
Select[Range[53, 11000, 64], PrimeQ] (* Harvey P. Dale, Dec 09 2013 *)

Prog

(Magma) [p: p in PrimesUpTo(11000) | p mod 64 eq 53]; // Vincenzo Librandi, Sep 07 2012

Crossrefs

Cf. A000040.

Sequence in context: A098671 A056157 A142919 * A061664 A008993 A142088

Adjacent sequences: A142946 A142947 A142948 * A142950 A142951 A142952

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 11 2008

Status

approved