A045432 Primes congruent to {3, 4} mod 7.

3, 11, 17, 31, 53, 59, 67, 73, 101, 109, 137, 151, 157, 179, 193, 199, 227, 241, 263, 269, 277, 283, 311, 347, 353, 367, 389, 409, 431, 479, 487, 521, 557, 563, 571, 577, 599, 613, 619, 641, 647, 661, 683, 739

Offset

1,1

Comments

Or, primes p such that p^2 == 2 (mod 7). - Zak Seidov, May 11 2013

Links

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

Mathematica

Select[Prime[Range[200]], MemberQ[{3, 4}, Mod[#, 7]]&]  (* Vincenzo Librandi, Aug 13 2012 *)
Select[Prime[Range[200]], PowerMod[#, 2, 7] == 2 &] (* Zak Seidov, May 11 2013 *)

Prog

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

Crossrefs

Cf. A047341 (superset), A225550.

Sequence in context: A276848 A194800 A154501 * A340541 A186424 A018520

Adjacent sequences: A045429 A045430 A045431 * A045433 A045434 A045435

Keyword

nonn,easy

Author

N. J. A. Sloane

Status

approved