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.

A216979 Primes of the form n^6+2.

Original entry on oeis.org

2, 3, 3518743763, 17596287803, 282429536483, 54980371265627, 93385106978411, 110322650964683, 151939915084883, 1363532208525371, 1870004703089603, 3684302682180851, 5257948522194371, 15813440003753003, 22416464978706683, 33227552537453171, 80425212553252451
Offset: 1

Views

Author

Michel Lagneau, Sep 21 2012

Keywords

Crossrefs

Programs

  • Magma
    [a: n in [0..700] | IsPrime(a) where a is n^6 + 2 ]; // Vincenzo Librandi, Oct 12 2012
  • Mathematica
    lst={}; Do[p=n^6+2; If[PrimeQ[p], AppendTo[lst, p]], {n, 6!}]; lst
    Select[Table[n^6 + 2, {n, 0, 700}], PrimeQ] (* Vincenzo Librandi, Oct 12 2012 *)
  • PARI
    v=select(n->isprime(n^6+2),vector(2000,n,n-1)); /* A216978 */
    vector(#v, n, v[n]^6+2)
    /* Joerg Arndt, Sep 21 2012 */
    

A216981 Primes of the form n^7+2.

Original entry on oeis.org

2, 3, 4782971, 1801088543, 1174711139839, 3938980639169, 93206534790701, 425927596977749, 1107984764452583, 2149422977421877, 7416552901015627, 19891027786401119, 307732862434921877, 830512886046548069, 1042842864990234377, 3678954248903875651
Offset: 1

Views

Author

Michel Lagneau, Sep 21 2012

Keywords

Crossrefs

Programs

  • Magma
    [a: n in [0..500] | IsPrime(a) where a is n^7+2]; // Vincenzo Librandi, Mar 15 2013
  • Mathematica
    lst={}; Do[p=n^7+2; If[PrimeQ[p], AppendTo[lst, p]], {n, 6!}]; lst
    Select[Table[n^7 + 2, {n, 0, 400}], PrimeQ] (* Vincenzo Librandi, Mar 15 2013 *)
  • PARI
    v=select(n->isprime(n^7+2),vector(2000,n,n-1)); /* A216980 */
    vector(#v, n, v[n]^7+2)
    /* Joerg Arndt, Sep 21 2012 */
    
  • PARI
    select(isprime, vector(2000,n,(n-1)^7+2)) \\ Charles R Greathouse IV, Sep 21 2012
    

A214001 Numbers n such that n^2+2, n^3+2, n^4+2 and n^5+2 are all prime.

Original entry on oeis.org

0, 1, 909, 2055, 11925, 145881, 191079, 254199, 358875, 490215, 614241, 642105, 648261, 689655, 864159, 959595, 1030911, 1047585, 1056981, 1150335, 1366971, 1406571, 1669845, 1746525, 2299485, 2357751, 2491809, 2494329, 2629869, 2876859, 3162159, 3220041, 3257595
Offset: 1

Views

Author

Michel Lagneau, Feb 15 2013

Keywords

Comments

n^6+2 is also prime for n = 0, 1, 1746525, 2876859, …

Crossrefs

Programs

  • Mathematica
    Select[Range[3500000], And@@PrimeQ/@(Table[n^i+2, {i, 2, 5}]/.n->#)&]
    Select[Range[0,33*10^5],AllTrue[#^Range[2,5]+2,PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jul 21 2018 *)
Showing 1-3 of 3 results.