A038984 Primes p such that 94 is not a square mod p.

7, 11, 19, 37, 41, 43, 53, 61, 67, 71, 73, 79, 101, 103, 107, 113, 137, 139, 149, 157, 163, 173, 179, 191, 193, 197, 211, 227, 233, 239, 257, 263, 269, 271, 277, 281, 313, 383, 397, 409, 419, 431, 433, 439, 443

Offset

1,1

Links

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

Mathematica

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

Prog

(Magma) [p: p in PrimesUpTo(443) | not IsSquare(R! 94) where R:= ResidueClassRing(p)]; // Vincenzo Librandi, Sep 10 2012
(Magma) [p: p in PrimesInInterval(3, 443) | JacobiSymbol(94, p) eq -1]; // Bruno Berselli, Sep 10 2012

Crossrefs

Sequence in context: A238501 A133425 A103802 * A165549 A055939 A154555

Adjacent sequences: A038981 A038982 A038983 * A038985 A038986 A038987

Keyword

nonn,easy

Author

N. J. A. Sloane.

Extensions

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

Status

approved