A003625 Primes congruent to {3, 5, 6} mod 7.
3, 5, 13, 17, 19, 31, 41, 47, 59, 61, 73, 83, 89, 97, 101, 103, 131, 139, 157, 167, 173, 181, 199, 223, 227, 229, 241, 251, 257, 269, 271, 283, 293, 307, 311, 313, 349, 353, 367, 383, 397, 409, 419, 433, 439, 461, 467, 479, 503, 509, 521, 523, 563, 577, 587, 593
Offset: 1
Keywords
References
- H. Hasse, Number Theory, Springer-Verlag, NY, 1980, p. 498.
- N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
Links
Programs
-
Magma
[p: p in PrimesUpTo(1000) | p mod 7 in [3, 5, 6]]; // Vincenzo Librandi, Aug 04 2012
-
Mathematica
Select[Prime[Range[800]],MemberQ[{3, 5, 6},Mod[#,7]]&] (* Vincenzo Librandi, Aug 04 2012 *)
-
PARI
{a(n) = local( cnt, m ); if( n<1, return( 0 )); while( cnt < n, if( isprime( m++) && kronecker( -7, m )==-1, cnt++ )); m} /* Michael Somos, Aug 14 2012 */
Comments