A045452 Primes congruent to {4, 5} mod 7.

5, 11, 19, 47, 53, 61, 67, 89, 103, 109, 131, 137, 151, 173, 179, 193, 229, 257, 263, 271, 277, 313, 347, 383, 389, 397, 431, 439, 467, 487, 509, 523, 557, 571, 593, 599, 607, 613, 641, 677, 683, 691, 719, 733

Offset

1,1

Links

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

Mathematica

Select[Prime[Range[200]], MemberQ[{4, 5}, Mod[#, 7]]&] (* Vincenzo Librandi, Aug 13 2012 *)
Select[Flatten[{#+4, #+5}&/@(7*Range[0, 150])], PrimeQ] (* Harvey P. Dale, Dec 27 2021 *)

Prog

(Magma) [ p: p in PrimesUpTo(1000) | p mod 7 in {4, 5} ]; // Vincenzo Librandi, Aug 13 2012

Crossrefs

Cf. A000040.

Sequence in context: A236584 A369547 A072743 * A152085 A267603 A323007

Adjacent sequences: A045449 A045450 A045451 * A045453 A045454 A045455

Keyword

nonn,easy

Author

N. J. A. Sloane

Status

approved