A038958 - OEIS

A038958

Primes p such that 73 is not a square mod p.

5, 7, 11, 13, 17, 29, 31, 43, 47, 53, 59, 83, 101, 103, 107, 113, 131, 139, 151, 157, 163, 167, 179, 191, 193, 197, 199, 229, 233, 239, 241, 263, 271, 277, 281, 307, 313, 331, 337, 379, 409, 421, 431, 433, 443

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

Also, primes p that are not squares mod 73 (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[73, #] == - 1 &] (* Vincenzo Librandi, Sep 09 2012 *)

PROG

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

CROSSREFS

Sequence in context: A102386 A348936 A346990 * A109416 A132170 A106309

Adjacent sequences: A038955 A038956 A038957 * A038959 A038960 A038961

KEYWORD

nonn,easy

AUTHOR

N. J. A. Sloane.

EXTENSIONS

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

STATUS

approved