

A038950


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


1



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
(list;
graph;
refs;
listen;
history;
text;
internal format)



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



