login
A038957
Primes p such that 73 is a square mod p.
3
2, 3, 19, 23, 37, 41, 61, 67, 71, 73, 79, 89, 97, 109, 127, 137, 149, 173, 181, 211, 223, 227, 251, 257, 269, 283, 293, 311, 317, 347, 349, 353, 359, 367, 373, 383, 389, 397, 401, 419, 439, 457, 461, 463, 479, 487
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[110]], ! JacobiSymbol[73, #] == -1 &] (* Vincenzo Librandi, Sep 08 2012 *)
CROSSREFS
Sequence in context: A128353 A217691 A109418 * A141750 A191045 A215324
KEYWORD
nonn
AUTHOR
STATUS
approved