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-3 of 3 results.

A274235 Numbers n such that n^2048 + (n+1)^2048 is prime.

Original entry on oeis.org

754, 1289, 1368, 1813, 3159, 3280, 3301, 4976, 6204, 6283, 6723, 6904, 7141, 10246, 11417, 13268, 15456, 19428, 19683, 19698, 20298, 21484, 22543, 23702, 23815, 24747, 27010, 32319, 34133, 36201, 37030, 39438, 41292, 44472, 47623, 50198, 51031, 51370, 51521, 52628, 53073, 53309, 53767, 55911, 56630, 59424
Offset: 1

Views

Author

Tim Johannes Ohrtmann, Jun 15 2016

Keywords

Comments

The terms correspond only to probable primes.

Crossrefs

Programs

  • Magma
    [n: n in [1..10000] |IsPrime(n^2048 + (n+1)^2048)];
  • Mathematica
    Select[Range[1, 10000], PrimeQ[#^2048 + (#+1)^2048] &]
  • PARI
    for(n=1, 10000, if(isprime(n^2048 + (n+1)^2048), print1(n, ", ")))
    

A274236 Numbers k such that k^4096 + (k+1)^4096 is prime.

Original entry on oeis.org

311, 2741, 3582, 5293, 6289, 12080, 14082, 16886, 17971, 19936, 21454, 21486, 26652, 26904, 28314, 34693, 35778, 36292, 40868, 43819, 46356, 46467, 49653, 53996, 57150, 58169, 64937, 67398, 77383, 82577, 86031, 86102, 87352, 87684, 89030, 93340, 95346, 97320, 98191, 111483, 113947, 118052, 125442, 125836, 126157, 127832, 130794
Offset: 1

Views

Author

Tim Johannes Ohrtmann, Jun 15 2016

Keywords

Comments

The terms correspond only to probable primes.

Crossrefs

Programs

  • Magma
    [n: n in [1..10000] |IsPrime(n^4096 + (n+1)^4096)];
  • Mathematica
    Select[Range[1, 10000], PrimeQ[#^4096 + (#+1)^4096] &]
  • PARI
    for(n=1, 10000, if(isprime(n^4096 + (n+1)^4096), print1(n, ", ")))
    

A274237 Numbers k such that k^8192 + (k+1)^8192 is prime.

Original entry on oeis.org

3508, 5209, 13428, 15347, 16339, 17779, 22548, 37726, 40408
Offset: 1

Views

Author

Tim Johannes Ohrtmann, Jun 15 2016

Keywords

Comments

The terms correspond only to probable primes.

Crossrefs

Programs

  • Magma
    [n: n in [1..10000] |IsPrime(n^8192 + (n+1)^8192)]
  • Mathematica
    Select[Range[1, 10000], PrimeQ[#^8192 + (#+1)^8192] &]
  • PARI
    for(n=1, 10000, if(isprime(n^8192 + (n+1)^8192), print1(n, ", ")))
    
Showing 1-3 of 3 results.