login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A267601 Primes which are squares (mod 47). 2
2, 3, 7, 17, 37, 47, 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, 659, 661, 683, 709, 719, 733, 739, 761, 769, 773, 811, 823, 827, 853 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
Motivated by A191056, previously having an (erroneous) definition equivalent to this one.
LINKS
MATHEMATICA
Select[Prime[Range[200]], JacobiSymbol[#, 47]!=-1&] (* Harvey P. Dale, Jan 26 2016 *)
PROG
(PARI) forprime(p=1, 999, issquare(Mod(p, 47))&&print1(p", "))
CROSSREFS
Sequence in context: A078721 A077007 A158498 * A155548 A191033 A105554
KEYWORD
nonn
AUTHOR
M. F. Hasler, Jan 18 2016
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 15 20:47 EDT 2024. Contains 371696 sequences. (Running on oeis4.)