[go: up one dir, main page]

login
A038987
Primes p such that 97 is a square mod p.
3
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
MATHEMATICA
Select[Prime[Range[120]], ! JacobiSymbol[97, #] == -1 &] (* Vincenzo Librandi, Sep 08 2012 *)
CROSSREFS
Sequence in context: A103275 A278209 A195732 * A142957 A191058 A080155
KEYWORD
nonn
AUTHOR
EXTENSIONS
Incorrect comment deleted by Philippe Deléham, Sep 16 2009
STATUS
approved