A038972 Primes p such that 85 is not a square mod p.

2, 11, 13, 29, 31, 41, 43, 47, 53, 61, 67, 71, 79, 83, 103, 109, 127, 131, 137, 139, 157, 181, 199, 211, 223, 241, 257, 263, 269, 293, 307, 311, 353, 373, 379, 383, 401, 419, 431, 433, 439, 443, 449, 457, 463, 467

Offset

1,1

Links

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

Mathematica

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

Prog

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

Crossrefs

Sequence in context: A154742 A257329 A063587 * A242776 A105887 A019407

Adjacent sequences: A038969 A038970 A038971 * A038973 A038974 A038975

Keyword

nonn,easy

Author

N. J. A. Sloane.

Extensions

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

Status

approved