

A191087


Primes p that have Kronecker symbol (p95) = 1.


1



7, 17, 23, 29, 31, 41, 43, 47, 59, 71, 73, 79, 83, 89, 109, 137, 151, 157, 163, 179, 181, 197, 211, 233, 241, 263, 269, 277, 281, 283, 313, 331, 347, 353, 367, 379, 397, 401, 409, 421, 431, 439, 443, 449, 457, 463, 467, 503, 509, 521, 557, 569, 577, 587, 593
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

Originally erroneously named "Primes that are not squares mod 95".  M. F. Hasler, Jan 18 2016


LINKS

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


MATHEMATICA

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


PROG

(MAGMA) [p: p in PrimesUpTo(593)  JacobiSymbol(p, 95) eq 1]; // Vincenzo Librandi, Sep 11 2012


CROSSREFS

Sequence in context: A247560 A215824 A239210 * A032454 A107643 A289363
Adjacent sequences: A191084 A191085 A191086 * A191088 A191089 A191090


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



