A142934 Primes congruent to 19 mod 64.

19, 83, 211, 467, 659, 787, 1171, 1427, 1619, 1747, 1811, 2003, 2131, 2579, 2707, 2963, 3347, 3539, 3923, 4051, 4243, 4691, 5011, 5651, 5779, 5843, 6163, 6547, 6803, 7187, 7507, 7699, 8147, 8467, 9043, 9491, 9619, 9811, 10067, 10259, 10771, 11027, 11411

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] == 19, AppendTo[lst, p]], {n, 7!}]; lst (* Vladimir Joseph Stephan Orlovsky, Feb 27 2009 *)
(* Somewhat faster program *) Select[Table[64n + 19, {n, 0, 200}], PrimeQ] (* Harvey P. Dale, Dec 13 2010 *)
Select[Prime[Range[1800]], MemberQ[{19}, Mod[#, 64]] &] (* Vincenzo Librandi, Sep 06 2012 *)

Prog

(Magma) [p: p in PrimesUpTo(12000) | p mod 64 eq 19 ]; // Vincenzo Librandi, Sep 06 2012

Crossrefs

Cf. A000040.

Sequence in context: A044587 A142042 A352614 * A036564 A062639 A209369

Adjacent sequences: A142931 A142932 A142933 * A142935 A142936 A142937

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 11 2008

Status

approved