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

A267897 a(n) = prime(n)! - prime(n).

Original entry on oeis.org

0, 3, 115, 5033, 39916789, 6227020787, 355687428095983, 121645100408831981, 25852016738884976639977, 8841761993739701954543615999971, 8222838654177922817725562879999969, 13763753091226345046315979581580902399999963
Offset: 1

Views

Author

Vincenzo Librandi, Jan 22 2016

Keywords

Crossrefs

Programs

  • Magma
    [Factorial(p)-p: p in PrimesUpTo(40)];
    
  • Mathematica
    Array[Prime[#]! - Prime[#] &, 20]
    #!-#&/@Prime[Range[20]] (* Harvey P. Dale, Oct 23 2024 *)
  • PARI
    lista(nn) = forprime(p=2, nn, print1(p! - p, ", ")); \\ Altug Alkan, Jan 23 2016

Formula

a(n) = A039716(n) - A000040(n).
a(n) = A005096(A000040(n)).

A267898 a(n) = prime(n)! + prime(n).

Original entry on oeis.org

4, 9, 125, 5047, 39916811, 6227020813, 355687428096017, 121645100408832019, 25852016738884976640023, 8841761993739701954543616000029, 8222838654177922817725562880000031, 13763753091226345046315979581580902400000037
Offset: 1

Views

Author

Vincenzo Librandi, Jan 22 2016

Keywords

Crossrefs

Programs

  • Magma
    [Factorial(p)+p: p in PrimesUpTo(40)];
    
  • Mathematica
    Array[Prime[#]! + Prime[#]&, 20]
    #!+#&/@Prime[Range[20]] (* Harvey P. Dale, Aug 04 2016 *)
  • PARI
    lista(nn) = forprime(p=2, nn, print1(p! + p, ", ")); \\ Altug Alkan, Jan 23 2016

Formula

a(n) = A039716(n) + A000040(n).
a(n) = A005095(A000040(n)).
Showing 1-2 of 2 results.