A038986 Primes p such that 95 is not a square mod p.

3, 11, 17, 29, 41, 67, 73, 89, 103, 107, 109, 127, 131, 137, 139, 157, 167, 181, 191, 197, 199, 223, 227, 233, 239, 241, 251, 269, 271, 277, 281, 307, 311, 313, 353, 359, 383, 397, 401, 409, 419, 421, 449, 457

Offset

1,1

Links

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

Mathematica

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

Prog

(Magma) [p: p in PrimesUpTo(457) | not IsSquare(R! 95) where R:= ResidueClassRing(p) ]; // Vincenzo Librandi, Sep 10 2012

Crossrefs

Sequence in context: A154613 A109654 A172070 * A276848 A194800 A154501

Adjacent sequences: A038983 A038984 A038985 * A038987 A038988 A038989

Keyword

nonn,easy

Author

N. J. A. Sloane.

Extensions

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

Status

approved