[go: up one dir, main page]

login
A038944
Primes p such that 62 is not a square mod p.
1
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
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
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset changed from 0 to 1 by Vincenzo Librandi, Sep 09 2012
STATUS
approved