login
A038940
Primes p such that 59 is not a square mod p.
1
2, 3, 7, 13, 19, 37, 61, 71, 73, 79, 89, 97, 101, 107, 109, 113, 127, 139, 149, 157, 163, 167, 173, 199, 223, 229, 233, 239, 251, 263, 269, 271, 307, 311, 313, 331, 337, 349, 353, 359, 379, 383, 397, 401, 409, 421
OFFSET
1,1
COMMENTS
Also, only entries p=1 (mod 4) of the sequence are not squares mod 59 (from the quadratic reciprocity law). - Lekraj Beedassy, Jul 21 2004
LINKS
MATHEMATICA
Select[Prime@Range[120], JacobiSymbol[59, #] == - 1 &] (* Vincenzo Librandi, Sep 09 2012 *)
PROG
(PARI) select(n->!issquare(Mod(59, n)), primes(100)) \\ Charles R Greathouse IV, Sep 09 2012
CROSSREFS
Sequence in context: A342529 A172238 A319496 * A019383 A249749 A171817
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset changed from 0 to 1 by Vincenzo Librandi, Sep 09 2012
STATUS
approved