A038929 Primes p such that 51 is a square mod p.

3, 5, 7, 13, 17, 29, 31, 41, 47, 59, 79, 83, 113, 139, 157, 163, 173, 179, 191, 197, 199, 211, 229, 233, 239, 251, 263, 269, 283, 317, 349, 359, 367, 373, 379, 383, 401, 409, 421, 433, 439, 443, 449, 457, 467, 487

Offset

1,1

Links

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

Mathematica

Select[Prime[Range[100]], ! JacobiSymbol[51, #] == -1 &] (* Vincenzo Librandi, Sep 08 2012 *)

Crossrefs

Sequence in context: A071111 A177070 A247018 * A242755 A070806 A339506

Adjacent sequences: A038926 A038927 A038928 * A038930 A038931 A038932

Keyword

nonn

Author

N. J. A. Sloane.

Status

approved