login
A142936
Primes congruent to 25 mod 64.
1
89, 281, 409, 601, 857, 1049, 1433, 1753, 2137, 2393, 2521, 2713, 2777, 2969, 3673, 3929, 4057, 4441, 4889, 5081, 5209, 5273, 5657, 5849, 6361, 6553, 7001, 7129, 7193, 7321, 7577, 8089, 8537, 9049, 9241, 9433, 9497, 9689, 9817, 10009, 10457, 11161, 11353, 11801
OFFSET
1,1
LINKS
MATHEMATICA
lst={}; Do[p=Prime[n]; If[Mod[p, 64]==25, AppendTo[lst, p]], {n, 7!}]; lst (* Vladimir Joseph Stephan Orlovsky, Mar 02 2009 *)
Select[Prime[Range[1800]], MemberQ[{25}, Mod[#, 64]] &] (* Vincenzo Librandi, Sep 06 2012 *)
Select[Range[25, 12000, 64], PrimeQ] (* Harvey P. Dale, Mar 22 2015 *)
PROG
(Magma) [p: p in PrimesUpTo(12000) | p mod 64 eq 25 ]; // Vincenzo Librandi, Sep 06 2012
CROSSREFS
Cf. A000040.
Sequence in context: A227519 A142393 A142045 * A142685 A140772 A142292
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Jul 11 2008
STATUS
approved