A038987 Primes p such that 97 is a square mod p.

2, 3, 11, 31, 43, 47, 53, 61, 73, 79, 89, 97, 101, 103, 109, 113, 151, 163, 167, 191, 193, 197, 227, 229, 241, 269, 283, 293, 307, 313, 353, 379, 389, 397, 419, 421, 431, 449, 461, 463, 467, 479, 487, 491, 503

Offset

1,1

Links

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

Mathematica

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

Crossrefs

Sequence in context: A103275 A278209 A195732 * A142957 A191058 A080155

Adjacent sequences: A038984 A038985 A038986 * A038988 A038989 A038990

Keyword

nonn

Author

N. J. A. Sloane.

Extensions

Incorrect comment deleted by Philippe Deléham, Sep 16 2009

Status

approved