A191070 Primes p that have Kronecker symbol (p|39) = -1.

7, 17, 19, 23, 29, 31, 37, 53, 67, 73, 97, 101, 107, 109, 113, 131, 151, 163, 173, 179, 191, 193, 223, 229, 233, 241, 251, 257, 263, 269, 271, 307, 311, 331, 347, 349, 379, 389, 397, 409, 419, 421, 443, 457, 463, 467, 487, 491, 499, 503, 521, 541, 563, 569

Offset

1,1

Comments

Originally erroneously named "Primes that are not squares mod 39", which contains this as a subsequence. - M. F. Hasler, Jan 18 2016

Links

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

Mathematica

Select[Prime[Range[200]], JacobiSymbol[#, 39]==-1&]

Prog

(Magma) [p: p in PrimesUpTo(569) | KroneckerSymbol(p, 39) eq -1]; // Bruno Berselli, Sep 11 2012

Crossrefs

Sequence in context: A067459 A323746 A101240 * A167797 A001913 A270387

Adjacent sequences: A191067 A191068 A191069 * A191071 A191072 A191073

Keyword

nonn,easy

Author

T. D. Noe, May 25 2011

Extensions

Definition corrected, following a suggestion from David Broadhurst, by M. F. Hasler, Jan 18 2016

Status

approved