login
Primes congruent to {3, 4} mod 7.
2

%I #22 Sep 08 2022 08:44:56

%S 3,11,17,31,53,59,67,73,101,109,137,151,157,179,193,199,227,241,263,

%T 269,277,283,311,347,353,367,389,409,431,479,487,521,557,563,571,577,

%U 599,613,619,641,647,661,683,739

%N Primes congruent to {3, 4} mod 7.

%C Or, primes p such that p^2 == 2 (mod 7). - _Zak Seidov_, May 11 2013

%H Vincenzo Librandi, <a href="/A045432/b045432.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Prime[Range[200]],MemberQ[{3,4},Mod[#,7]]&] (* _Vincenzo Librandi_, Aug 13 2012 *)

%t Select[Prime[Range[200]], PowerMod[#,2,7] == 2 &] (* _Zak Seidov_, May 11 2013 *)

%o (Magma) [ p: p in PrimesUpTo(1000) | p mod 7 in {3,4} ]; // _Vincenzo Librandi_, Aug 13 2012

%Y Cf. A047341 (superset), A225550.

%K nonn,easy

%O 1,1

%A _N. J. A. Sloane_