A191072 Primes that are not squares mod 47.

5, 11, 13, 19, 23, 29, 31, 41, 43, 67, 73, 107, 109, 113, 127, 137, 139, 151, 163, 167, 179, 181, 193, 199, 211, 223, 227, 229, 233, 257, 281, 293, 311, 313, 317, 349, 359, 367, 373, 389, 409, 419, 421, 433, 443, 449, 461, 463, 467, 499, 503, 509, 547, 557

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

Select[Prime[Range[200]], JacobiSymbol[#, 47]==-1&]

Prog

(Magma) [p: p in PrimesUpTo(557) | JacobiSymbol(p, 47) eq -1]; // Vincenzo Librandi, Sep 11 2012

Crossrefs

Sequence in context: A024900 A087490 A140565 * A153418 A079019 A191034

Adjacent sequences: A191069 A191070 A191071 * A191073 A191074 A191075

Keyword

nonn,easy

Author

T. D. Noe, May 25 2011

Status

approved