OFFSET
1,1
COMMENTS
Primes congruent to 11, 13, 17, 19 (mod 20). - Michael Somos, Aug 14 2012
Legendre symbol (-5, a(n)) = -1. For prime 5 this symbol is set to 0, and for other odd primes (-5, prime) = +1, given in A139513. - Wolfdieter Lang, Mar 05 2021
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
Vincenzo Librandi, Table of n, a(n) for n = 1..5000
R. G. Wilson, V, Letter to N. J. A. Sloane, Oct. 1993
MATHEMATICA
Select[Prime[Range[1000]], MemberQ[{11, 13, 17, 19}, Mod[#, 20]]&] (* Vincenzo Librandi, Aug 20 2012 *)
PROG
(PARI) {a(n) = local( cnt, m ); if( n<1, return( 0 )); while( cnt < n, if( isprime( m++) && kronecker( -20, m )==-1, cnt++ )); m} /* Michael Somos, Aug 14 2012 */
CROSSREFS
KEYWORD
nonn,nice
AUTHOR
STATUS
approved