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,1

Links

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

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 A378945 A155757

Adjacent sequences: A191019 A191020 A191021 * A191023 A191024 A191025

Keyword

nonn,easy

Author

T. D. Noe, May 24 2011

Status

approved