(Translated by https://www.hiragana.jp/)
A038960 - OEIS
login
A038960
Primes p such that 74 is not a square mod p.
1
3, 11, 17, 23, 31, 53, 67, 79, 83, 89, 97, 101, 103, 107, 113, 139, 149, 157, 167, 173, 181, 191, 193, 197, 199, 211, 229, 239, 241, 257, 269, 281, 293, 307, 311, 313, 317, 349, 353, 373, 379, 383, 397, 401, 409
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime@Range[2120], JacobiSymbol[74, #] == - 1 &] (* Vincenzo Librandi, Sep 09 2012 *)
PROG
(Magma) [ p: p in PrimesUpTo(409) | not IsSquare(R! 74) where R:= ResidueClassRing(p) ]; // Vincenzo Librandi, Sep 10 2012
CROSSREFS
Sequence in context: A141339 A069348 A165561 * A019397 A108328 A153419
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
Offset changed from 0 to 1 by Vincenzo Librandi, Sep 09 2012
STATUS
approved