A038974 Primes p such that 86 is not a square mod p.

3, 13, 19, 23, 31, 47, 53, 73, 79, 89, 101, 103, 109, 113, 127, 131, 137, 163, 167, 173, 179, 181, 197, 211, 227, 229, 233, 239, 241, 257, 269, 271, 293, 311, 313, 317, 331, 347, 359, 367, 397, 409, 419, 431, 433

Offset

1,1

Links

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

Mathematica

Select[Prime[Range[100]], JacobiSymbol[86, #]==-1&] (* Harvey P. Dale, Feb 02 2012 *)

Prog

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

Crossrefs

Sequence in context: A260802 A338341 A045435 * A168425 A252090 A079419

Adjacent sequences: A038971 A038972 A038973 * A038975 A038976 A038977

Keyword

nonn,easy

Author

N. J. A. Sloane.

Extensions

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

Status

approved