A191053 Primes that are squares mod 89.

2, 5, 11, 17, 47, 53, 67, 71, 73, 79, 97, 107, 109, 131, 139, 157, 167, 173, 179, 199, 223, 227, 233, 251, 257, 263, 269, 271, 277, 283, 307, 311, 317, 331, 347, 367, 373, 401, 409, 443, 449, 461, 463, 467, 479, 487, 509, 523, 587, 601, 607, 613, 619, 631

Offset

1,1

Links

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

Mathematica

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

Prog

(Magma) [p: p in PrimesUpTo(631) | JacobiSymbol(p, 89) eq 1]; // Vincenzo Librandi, Sep 10 2012

Crossrefs

Sequence in context: A144572 A038977 A141778 * A209493 A117877 A226215

Adjacent sequences: A191050 A191051 A191052 * A191054 A191055 A191056

Keyword

nonn,easy

Author

T. D. Noe, May 25 2011

Status

approved