login
A191079
Primes that are not squares mod 71.
1
7, 11, 13, 17, 23, 31, 41, 47, 53, 59, 61, 67, 97, 113, 127, 137, 139, 149, 163, 173, 181, 193, 197, 211, 227, 239, 241, 257, 269, 281, 283, 307, 317, 331, 337, 347, 349, 353, 383, 389, 397, 401, 421, 433, 439, 443, 449, 457, 461, 467, 479, 487, 491, 523
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[200]], JacobiSymbol[#, 71]==-1&]
PROG
(Magma) [p: p in PrimesUpTo(523) | JacobiSymbol(p, 71) eq -1]; // Vincenzo Librandi, Sep 11 2012
CROSSREFS
Sequence in context: A173700 A067557 A103485 * A279190 A309671 A073704
KEYWORD
nonn,easy
AUTHOR
T. D. Noe, May 25 2011
STATUS
approved