A191038 Primes that are squares mod 59.

3, 5, 7, 17, 19, 29, 41, 53, 71, 79, 107, 127, 137, 139, 163, 167, 181, 193, 197, 199, 223, 239, 241, 251, 257, 263, 271, 277, 281, 293, 307, 311, 317, 331, 359, 373, 379, 383, 389, 433, 439, 449, 461, 479, 487, 491, 499, 521, 523, 547, 557, 577, 593, 599

Offset

1,1

Links

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

Mathematica

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

Prog

(Magma) [p: p in PrimesUpTo(599) | JacobiSymbol(p, 59) eq 1]; // Vincenzo Librandi, Sep 10 2012

Crossrefs

Sequence in context: A045400 A163425 A374156 * A299298 A122395 A045401

Adjacent sequences: A191035 A191036 A191037 * A191039 A191040 A191041

Keyword

nonn,easy

Author

T. D. Noe, May 25 2011

Status

approved