A038960 Primes p such that 74 is not a square mod p.

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

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

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

Adjacent sequences: A038957 A038958 A038959 * A038961 A038962 A038963

Keyword

nonn,easy

Author

N. J. A. Sloane.

Extensions

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

Status

approved