A191022 Primes that are squares mod 29.

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

Author

T. D. Noe, May 24 2011

Keywords

• nonn
• easy

Links

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

Programs

Magma

[p: p in PrimesUpTo(613) | IsOne(JacobiSymbol(p,29))]; // Bruno Berselli, Sep 10 2012

Mathematica

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