A038962 Primes p such that 77 is not a square mod p.

2, 3, 5, 29, 31, 43, 47, 59, 79, 89, 97, 103, 107, 109, 127, 149, 151, 157, 181, 193, 197, 199, 211, 223, 229, 233, 239, 251, 257, 263, 269, 277, 281, 311, 313, 337, 347, 353, 359, 367, 373, 383, 397, 419, 431

Offset

1,1

Links

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

Mathematica

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

Prog

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

Crossrefs

Sequence in context: A084598 A215307 A215103 * A309179 A019400 A354084

Adjacent sequences: A038959 A038960 A038961 * A038963 A038964 A038965

Keyword

nonn,easy

Author

N. J. A. Sloane.

Extensions

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

Status

approved