OFFSET
1,1
COMMENTS
Primes congruent to 5, 11, 13, 15, 17, 23 (modulo 28). - Michael Somos, Aug 14 2012
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
MATHEMATICA
Select[Prime[Range[1000]], MemberQ[{5, 11, 13, 15, 17, 23}, Mod[#, 28]]&] (* Vincenzo Librandi, Aug 20 2012 *)
PROG
(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 */
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved