login
A127579
Primes of the form 64n+63.
5
127, 191, 383, 1087, 1151, 1279, 1471, 1663, 2111, 2239, 2687, 2879, 3391, 3583, 3967, 4159, 4799, 5119, 5503, 6079, 6143, 6271, 6719, 6911, 7039, 7103, 7487, 8191, 8447, 8831, 9151, 9343, 9791, 10111, 10303, 10559, 10687, 11071, 11519, 11839
OFFSET
1,1
LINKS
MATHEMATICA
a = {}; Do[If[PrimeQ[64n + 63], AppendTo[a, 64n + 63]], {n, 1, 200}]; a
Select[Prime[Range[4000]], MemberQ[{63}, Mod[#, 64]] &] (* Vincenzo Librandi, Aug 25 2012 *)
Select[Range[63, 12000, 64], PrimeQ] (* Harvey P. Dale, Mar 01 2015 *)
PROG
(Magma) [p: p in PrimesUpTo(12000) | p mod 64 eq 63]; // Vincenzo Librandi, Aug 25 2012
(PARI) forprime(p=2, 1e6, if(bitand(p, 63)==63, print1(p", "))) \\ Charles R Greathouse IV, May 15 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Artur Jasinski, Jan 19 2007
STATUS
approved