login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A191033
Primes that are squares mod 47.
1
2, 3, 7, 17, 37, 53, 59, 61, 71, 79, 83, 89, 97, 101, 103, 131, 149, 157, 173, 191, 197, 239, 241, 251, 263, 269, 271, 277, 283, 307, 331, 337, 347, 353, 379, 383, 397, 401, 431, 439, 457, 479, 487, 491, 521, 523, 541, 571, 601, 613, 617, 619, 643, 647, 653
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[200]], JacobiSymbol[#, 47]==1&]
PROG
(Magma) [p: p in PrimesUpTo(653) | JacobiSymbol(p, 47) eq 1]; // Vincenzo Librandi, Sep 10 2012
CROSSREFS
Sequence in context: A158498 A267601 A155548 * A105554 A145230 A135364
KEYWORD
nonn,easy
AUTHOR
T. D. Noe, May 24 2011
STATUS
approved