A127592 Primes of the form 64k+21.
149, 277, 661, 853, 1109, 1237, 1301, 1429, 1493, 1621, 1877, 2069, 2389, 2837, 3221, 3413, 3541, 3733, 3797, 3989, 4373, 5077, 5333, 5653, 5717, 6037, 6101, 6229, 6421, 6869, 6997, 7253, 7573, 7829, 8597, 9109, 9173, 9749, 9941, 10069, 10133, 10453
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Programs
-
Magma
[p: p in PrimesUpTo(11000) | p mod 64 eq 21 ]; // Vincenzo Librandi, Sep 06 2012
-
Mathematica
a = {}; Do[If[PrimeQ[21 + 64 n], AppendTo[a, 21 + 64 n]], {n, 0, 200}]; a Select[Prime[Range[1700]], MemberQ[{21}, Mod[#, 64]] &] (* Vincenzo Librandi, Sep 06 2012 *)
Comments