A038950 Primes p such that 67 is not a square mod p.

2, 5, 13, 19, 23, 41, 47, 53, 59, 61, 71, 83, 97, 101, 103, 107, 109, 113, 127, 131, 137, 151, 163, 167, 197, 199, 211, 223, 227, 229, 233, 263, 281, 283, 307, 313, 337, 353, 359, 373, 401, 409, 419, 431, 433, 439

Offset

1,1

Comments

Also, only entries p=1 (mod 4) of the sequence are not squares mod 67 (from the quadratic reciprocity law). - Lekraj Beedassy, Jul 21 2004

Links

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

Mathematica

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

Prog

(PARI) select(n->!issquare(Mod(67, n)), primes(100)) \\ Charles R Greathouse IV, Sep 09 2012

Crossrefs

Sequence in context: A045364 A045365 A104491 * A019390 A073770 A077545

Adjacent sequences: A038947 A038948 A038949 * A038951 A038952 A038953

Keyword

nonn

Author

N. J. A. Sloane.

Extensions

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

Status

approved