

A191080


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


1



5, 7, 11, 17, 23, 31, 43, 59, 61, 73, 83, 97, 113, 139, 149, 151, 157, 181, 191, 193, 197, 211, 223, 227, 233, 241, 257, 263, 271, 277, 283, 293, 311, 317, 373, 409, 457, 461, 463, 487, 503, 509, 521, 523, 547, 557, 569, 571, 577, 587, 599, 631, 641, 647
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

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


LINKS

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


MATHEMATICA

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


PROG

(MAGMA) [p: p in PrimesUpTo(647)  KroneckerSymbol(p, 78) eq 1]; // Vincenzo Librandi, Sep 11 2012


CROSSREFS

Sequence in context: A166574 A163846 A156104 * A293200 A067830 A191019
Adjacent sequences: A191077 A191078 A191079 * A191081 A191082 A191083


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



