A038944 Primes p such that 62 is not a square mod p.

3, 5, 7, 11, 17, 43, 47, 71, 73, 83, 89, 101, 103, 109, 137, 139, 149, 157, 173, 179, 191, 241, 251, 293, 311, 313, 317, 331, 337, 347, 349, 353, 359, 373, 397, 401, 409, 421, 431, 433, 439, 449, 457, 479, 491

Offset

1,1

Links

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

Mathematica

Select[Prime@Range[120], JacobiSymbol[62, #] == - 1 &] (* Vincenzo Librandi, Sep 09 2012 *)

Prog

(PARI) select(n->!issquare(Mod(62, n)), primes(100)) \\ Charles R Greathouse IV, Sep 09 2012

Crossrefs

Sequence in context: A282632 A212912 A356751 * A124081 A119573 A001366

Adjacent sequences: A038941 A038942 A038943 * A038945 A038946 A038947

Keyword

nonn

Author

N. J. A. Sloane.

Extensions

Offset changed from 0 to 1 by Vincenzo Librandi, Sep 09 2012

Status

approved