cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-4 of 4 results.

A191042 Primes p that have Jacobi symbol (p|69) = 1.

Original entry on oeis.org

5, 11, 13, 17, 31, 53, 73, 83, 89, 107, 113, 127, 137, 139, 149, 151, 163, 191, 193, 211, 223, 227, 251, 263, 271, 277, 281, 293, 307, 331, 349, 359, 383, 389, 397, 401, 409, 419, 431, 439, 463, 467, 479, 487, 499, 503, 521, 541, 547, 557, 563, 569, 577, 601
Offset: 1

Views

Author

T. D. Noe, May 25 2011

Keywords

Comments

Originally incorrectly named "primes which are squares mod 69", which would be the sequence (3, 13, 31, 73, 127, 139, 151, 163, 193, 211, 223, 271, 277, 307, 331, 349, 397, ...). - M. F. Hasler, Jan 15 2016

Crossrefs

Programs

  • Magma
    [p: p in PrimesUpTo(601) | JacobiSymbol(p, 69) eq 1]; // Vincenzo Librandi, Sep 10 2012
    
  • Mathematica
    Select[Prime[Range[200]], JacobiSymbol[#,69]==1&]
  • PARI
    select(p->kronecker(p, 69)==1&&isprime(p), [1..1000]) \\ This is to provide a generic characteristic function ("is_A191043") as 1st arg of select(), there are other ways to produce the sequence more efficiently. - M. F. Hasler, Jan 15 2016

Extensions

Definition corrected (following an observation by David Broadhurst) by M. F. Hasler, Jan 15 2016

A191046 Primes p that have Kronecker symbol (p|74) = 1.

Original entry on oeis.org

5, 7, 13, 19, 29, 41, 43, 47, 59, 61, 71, 73, 109, 127, 131, 137, 151, 163, 179, 223, 227, 233, 251, 263, 271, 277, 283, 331, 337, 347, 359, 367, 389, 421, 433, 461, 467, 499, 521, 523, 541, 547, 557, 563, 587, 593, 599, 601, 617, 641, 643, 653, 661, 673
Offset: 1

Views

Author

T. D. Noe, May 25 2011

Keywords

Comments

Originally incorrectly named "primes which are squares mod 74", which is sequence A038913. - M. F. Hasler, Jan 15 2016

Crossrefs

Programs

  • Magma
    [p: p in PrimesUpTo(673) | KroneckerSymbol(p, 74) eq 1]; // Vincenzo Librandi, Sep 11 2012
    
  • Mathematica
    Select[Prime[Range[200]], JacobiSymbol[#,74]==1&]
  • PARI
    select(p->kronecker(p, 74)==1&&isprime(p), [1..1000]) \\ This is to provide a generic characteristic function ("is_A191046") as 1st arg of select(), there are other ways to produce the sequence more efficiently. - M. F. Hasler, Jan 15 2016

Extensions

Definition corrected (following an observation by David Broadhurst) by M. F. Hasler, Jan 15 2016

A191049 Primes p that have Kronecker symbol (p|82) = 1.

Original entry on oeis.org

3, 11, 13, 19, 23, 29, 31, 53, 67, 73, 101, 103, 109, 113, 127, 149, 157, 179, 181, 211, 223, 227, 229, 241, 271, 293, 317, 331, 337, 347, 353, 359, 367, 397, 401, 409, 421, 431, 433, 449, 487, 499, 509, 547, 557, 563, 569, 571, 587, 599, 607, 617, 631, 643
Offset: 1

Views

Author

T. D. Noe, May 25 2011

Keywords

Comments

Originally incorrectly named "primes which are squares mod 82", which is sequence A038919. - M. F. Hasler, Jan 15 2016

Crossrefs

Programs

  • Magma
    [p: p in PrimesUpTo(643) | KroneckerSymbol(p, 82) eq 1]; // Vincenzo Librandi, Sep 11 2012
    
  • Mathematica
    Select[Prime[Range[200]], JacobiSymbol[#,82]==1&]
  • PARI
    select(p->kronecker(p, 82)==1&&isprime(p), [1..1000]) \\ This is to provide a generic characteristic function ("is_A191049") as 1st arg of select(), there are other ways to produce the sequence more efficiently. - M. F. Hasler, Jan 15 2016

Extensions

Definition corrected (following an observation by David Broadhurst) by M. F. Hasler, Jan 15 2016

A191051 Primes p that have Kronecker symbol (p|86) = 1.

Original entry on oeis.org

3, 5, 17, 19, 23, 29, 31, 37, 41, 47, 61, 79, 97, 103, 127, 131, 149, 157, 163, 167, 179, 193, 211, 227, 239, 271, 277, 281, 311, 331, 337, 347, 349, 353, 359, 367, 373, 389, 401, 419, 421, 431, 439, 467, 479, 487, 491, 499, 523, 569, 571, 587, 599, 617, 653
Offset: 1

Views

Author

T. D. Noe, May 25 2011

Keywords

Comments

Originally incorrectly named "primes which are squares mod 86", which is sequence A106891. - M. F. Hasler, Jan 15 2016

Crossrefs

Programs

  • Magma
    [p: p in PrimesUpTo(653) | KroneckerSymbol(p, 86) eq 1]; // Vincenzo Librandi, Sep 11 2012
    
  • Mathematica
    Select[Prime[Range[200]], JacobiSymbol[#,86]==1&]
  • PARI
    select(p->kronecker(p, 86)==1&&isprime(p), [1..1000]) \\ This is to provide a generic characteristic function ("is_A191051") as 1st arg of select(), there are other ways to produce the sequence more efficiently. - M. F. Hasler, Jan 15 2016

Extensions

Definition corrected by M. F. Hasler, Jan 15 2016
Showing 1-4 of 4 results.