login
A191022
Primes that are squares mod 29.
2
5, 7, 13, 23, 53, 59, 67, 71, 83, 103, 107, 109, 139, 149, 151, 167, 173, 179, 181, 197, 199, 223, 227, 233, 239, 241, 257, 277, 281, 283, 313, 347, 349, 353, 373, 383, 397, 401, 419, 431, 439, 457, 463, 487, 499, 509, 521, 523, 547, 557, 571, 587, 593, 613
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[200]], JacobiSymbol[#, 29]==1&]
PROG
(Magma) [p: p in PrimesUpTo(613) | IsOne(JacobiSymbol(p, 29))]; // Bruno Berselli, Sep 10 2012
CROSSREFS
Sequence in context: A155006 A201474 A078724 * A262958 A155757 A027674
KEYWORD
nonn,easy
AUTHOR
T. D. Noe, May 24 2011
STATUS
approved