login
A038964
Primes p such that 78 is not a square mod p.
1
5, 17, 19, 47, 61, 67, 71, 73, 79, 97, 103, 107, 113, 127, 131, 149, 157, 163, 167, 179, 181, 193, 197, 199, 233, 239, 241, 251, 257, 277, 293, 307, 317, 331, 347, 359, 367, 373, 379, 383, 409, 419, 431, 439, 443
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime@Range[120], JacobiSymbol[78, #] == - 1 &] (* Vincenzo Librandi, Sep 09 2012 *)
PROG
(Magma) [ p: p in PrimesUpTo(443) | not IsSquare(R! 78) where R:= ResidueClassRing(p) ]; // Vincenzo Librandi, Sep 10 2012
CROSSREFS
Sequence in context: A124873 A129745 A304129 * A019401 A217079 A153320
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
Offset changed from 0 to 1 by Vincenzo Librandi, Sep 09 2012
STATUS
approved