A045469 Primes congruent to {1, 4} mod 7.

11, 29, 43, 53, 67, 71, 109, 113, 127, 137, 151, 179, 193, 197, 211, 239, 263, 277, 281, 337, 347, 379, 389, 421, 431, 449, 463, 487, 491, 547, 557, 571, 599, 613, 617, 631, 641, 659, 673, 683, 701, 739, 743

Offset

1,1

Comments

The same as A045461 except for the initial 7 (the only prime congruent to 0 mod 7). - Alonso del Arte, Feb 18 2012

Links

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

Mathematica

Select[Prime[Range[120]], MemberQ[{1, 4}, Mod[#, 7]] &] (* Alonso del Arte, based on Orlovsky's program for A042992, Feb 18 2012 *)

Prog

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

Crossrefs

Cf. A140444, A045471.

Sequence in context: A247089 A156110 A155188 * A219790 A249436 A167521

Adjacent sequences: A045466 A045467 A045468 * A045470 A045471 A045472

Keyword

nonn,easy

Author

N. J. A. Sloane

Status

approved