A038978 Primes p such that 89 is not a square mod p.

3, 7, 13, 19, 23, 29, 31, 37, 41, 43, 59, 61, 83, 101, 103, 113, 127, 137, 149, 151, 163, 181, 191, 193, 197, 211, 229, 239, 241, 281, 293, 313, 337, 349, 353, 359, 379, 383, 389, 397, 419, 421, 431, 433, 439, 457

Offset

1,1

Comments

Also, primes p that are not squares mod 89 (from the quadratic reciprocity law). - Lekraj Beedassy, Jul 13 2004

Links

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

Mathematica

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

Prog

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

Crossrefs

Sequence in context: A364722 A310260 A310261 * A291283 A336377 A133387

Adjacent sequences: A038975 A038976 A038977 * A038979 A038980 A038981

Keyword

nonn,easy

Author

N. J. A. Sloane.

Extensions

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

Status

approved