A191058 - OEIS

A191058

Primes that are squares mod 97.

2, 3, 11, 31, 43, 47, 53, 61, 73, 79, 89, 101, 103, 109, 113, 151, 163, 167, 191, 193, 197, 227, 229, 241, 269, 283, 293, 307, 313, 353, 379, 389, 397, 419, 421, 431, 449, 461, 463, 467, 479, 487, 491, 503, 509, 521, 547, 557, 571, 593, 607, 613, 617, 631

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

MATHEMATICA

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

PROG

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

CROSSREFS

Sequence in context: A195732 A038987 A142957 * A080155 A235625 A032357

Adjacent sequences: A191055 A191056 A191057 * A191059 A191060 A191061