

A191085


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


1



2, 3, 11, 17, 37, 61, 67, 71, 101, 103, 109, 131, 137, 139, 149, 151, 157, 163, 173, 181, 193, 197, 199, 239, 251, 257, 269, 281, 283, 311, 313, 317, 331, 359, 367, 379, 401, 419, 421, 431, 433, 439, 449, 457, 463, 467, 487, 499, 503, 521, 523, 541, 557, 563
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

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


LINKS

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


MATHEMATICA

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


PROG

(Magma) [p: p in PrimesUpTo(563)  JacobiSymbol(p, 91) eq 1]; // Vincenzo Librandi, Sep 11 2012


CROSSREFS

Cf. A191054.
Sequence in context: A038907 A019417 A176671 * A024859 A023870 A025099
Adjacent sequences: A191082 A191083 A191084 * A191086 A191087 A191088


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



