A003628 Primes congruent to {5, 7} mod 8.
5, 7, 13, 23, 29, 31, 37, 47, 53, 61, 71, 79, 101, 103, 109, 127, 149, 151, 157, 167, 173, 181, 191, 197, 199, 223, 229, 239, 263, 269, 271, 277, 293, 311, 317, 349, 359, 367, 373, 383, 389, 397, 421, 431, 439
Offset: 1
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
-
Haskell
a003628 n = a003628_list !! (n-1) a003628_list = filter ((== 1) . a010051) a047566_list -- Reinhard Zumkeller, Dec 29 2012, Jan 22 2012
-
Magma
[ p: p in PrimesUpTo(600) | p mod 8 in {5, 7}]; // Vincenzo Librandi, Aug 22 2012
-
Mathematica
Select[Prime[Range[200]],MemberQ[{5,7},Mod[#,8]]&] (* Harvey P. Dale, Oct 24 2011 *)
-
PARI
{a(n) = local( cnt, m ); if( n<1, return( 0 )); while( cnt < n, if( isprime( m++) && kronecker( -2, m )==-1, cnt++ )); m} /* Michael Somos, Aug 14 2012 */
Formula
a(n) ~ 2n log n. - Charles R Greathouse IV, Feb 24 2023
Comments