login
A191044
Primes that are squares mod 71.
1
2, 3, 5, 19, 29, 37, 43, 73, 79, 83, 89, 101, 103, 107, 109, 131, 151, 157, 167, 179, 191, 199, 223, 229, 233, 251, 263, 271, 277, 293, 311, 313, 359, 367, 373, 379, 409, 419, 431, 463, 499, 503, 509, 521, 547, 557, 569, 571, 577, 587, 593, 613, 617, 641
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[200]], JacobiSymbol[#, 71]==1&]
PROG
(Magma) [p: p in PrimesUpTo(641) | JacobiSymbol(p, 71) eq 1]; // Vincenzo Librandi, Sep 10 2012
CROSSREFS
Sequence in context: A348900 A161414 A215319 * A344948 A079376 A338646
KEYWORD
nonn,easy
AUTHOR
T. D. Noe, May 25 2011
STATUS
approved