[go: up one dir, main page]

login
A038928
Primes p such that 47 is not a square mod p.
2
3, 5, 7, 13, 29, 41, 59, 71, 73, 79, 83, 103, 109, 113, 131, 137, 181, 191, 193, 229, 233, 239, 251, 257, 263, 271, 281, 283, 293, 307, 313, 317, 331, 347, 349, 373, 379, 383, 389, 409, 421, 431, 433, 439, 449
OFFSET
1,1
COMMENTS
Also, only entries p=1 (mod 4) of the sequence are not squares mod 47 (from the quadratic reciprocity law). - Lekraj Beedassy, Jul 21 2004
LINKS
MATHEMATICA
Select[Prime@Range[120], JacobiSymbol[47, #] == -1 &] (* Vincenzo Librandi, Sep 09 2012 *)
PROG
(PARI) select(n->!issquare(Mod(47, n)), primes(100)) \\ Charles R Greathouse IV, Sep 09 2012
CROSSREFS
Sequence in context: A224221 A128547 A087383 * A359436 A225504 A089740
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset changed from 0 to 1 by Vincenzo Librandi, Sep 09 2012
STATUS
approved