login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A191040
Primes p that have Kronecker symbol (p|62) = 1.
7
3, 7, 11, 13, 29, 37, 41, 43, 47, 53, 61, 71, 83, 97, 103, 113, 139, 179, 181, 191, 193, 197, 229, 233, 251, 257, 269, 277, 281, 311, 331, 347, 359, 389, 431, 439, 461, 479, 491, 499, 503, 509, 521, 523, 557, 571, 577, 587, 593, 599, 607, 613, 617, 619, 643
OFFSET
1,1
COMMENTS
Originally incorrectly named "primes which are squares (mod 62)", which is sequence A267481. - M. F. Hasler, Jan 15 2016
LINKS
MATHEMATICA
Select[Prime[Range[200]], JacobiSymbol[#, 62]==1&]
PROG
(Magma) [p: p in PrimesUpTo(643) | KroneckerSymbol(p, 62) eq 1]; // Vincenzo Librandi, Sep 11 2012
(PARI) select(p->kronecker(p, 62)==1&&isprime(p), [1..1000]) \\ This is to provide a generic characteristic function ("is_A191040") as 1st arg of select(), there are other ways to produce the sequence more efficiently. - M. F. Hasler, Jan 15 2016
KEYWORD
nonn,easy
AUTHOR
T. D. Noe, May 25 2011
EXTENSIONS
Definition corrected (following an observation by David Broadhurst) by M. F. Hasler, Jan 15 2016
STATUS
approved