A191035 Primes that are squares mod 53.

7, 11, 13, 17, 29, 37, 43, 47, 59, 89, 97, 107, 113, 131, 149, 163, 197, 199, 211, 223, 227, 229, 241, 269, 271, 281, 293, 307, 311, 317, 331, 347, 367, 409, 431, 433, 439, 449, 461, 467, 487, 521, 523, 541, 547, 577, 587, 593, 599, 607, 619, 643, 647, 653

Offset

1,1

Links

Robert Price, Table of n, a(n) for n = 1..7480

Mathematica

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

Prog

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

Crossrefs

Sequence in context: A040108 A038931 A141189 * A373299 A038877 A019351

Adjacent sequences: A191032 A191033 A191034 * A191036 A191037 A191038

Keyword

nonn,easy

Author

T. D. Noe, May 24 2011

Status

approved