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.

A337749 a(n) = n! * Sum_{k=0..floor(n/2)} (-1)^k / (n-2*k)!.

Original entry on oeis.org

1, 1, -1, -5, 13, 101, -389, -4241, 21785, 305353, -1960649, -33588829, 258805669, 5239857325, -47102631757, -1100370038249, 11304631621681, 299300650403729, -3459217276234385, -102360822438075317, 1314502564969066301, 42991545423991633141, -607300185015708631061
Offset: 0

Views

Author

Ilya Gutkovskiy, Sep 18 2020

Keywords

Crossrefs

Programs

  • Mathematica
    Table[n! Sum[(-1)^k/(n - 2 k)!, {k, 0, Floor[n/2]}], {n, 0, 22}]
    nmax = 22; CoefficientList[Series[Exp[x]/(1 + x^2), {x, 0, nmax}], x] Range[0, nmax]!
    (* alternative code *)
    f[x_]:=I*(ExpIntegralE[-x,I]*E^I-ExpIntegralE[-x,-I]*E^(-I))/2
    FunctionExpand[Array[f,20,0]] (* Velin Yanev, Oct 13 2021 *)
  • PARI
    a(n) = n!*sum(k=0, n\2, (-1)^k / (n-2*k)!); \\ Michel Marcus, Sep 18 2020

Formula

G.f.: Sum_{k>=0} (-1)^k * (2*k)! * x^(2*k) / (1 - x)^(2*k+1).
E.g.f.: exp(x) / (1 + x^2).
a(0) = a(1) = 1; a(n) = 1 - n * (n-1) * a(n-2).

A337750 a(n) = n! * Sum_{k=0..floor(n/3)} (-1)^k / (n-3*k)!.

Original entry on oeis.org

1, 1, 1, -5, -23, -59, 601, 4831, 19825, -302903, -3478319, -19626749, 399831961, 5968795405, 42864819817, -1091541253529, -20055152560799, -174888464853359, 5344185977277985, 116600656988485387, 1196237099596975561, -42646604098678320299, -1077390070573604975879
Offset: 0

Views

Author

Ilya Gutkovskiy, Sep 18 2020

Keywords

Crossrefs

Programs

  • Mathematica
    Table[n! Sum[(-1)^k/(n - 3 k)!, {k, 0, Floor[n/3]}], {n, 0, 22}]
    nmax = 22; CoefficientList[Series[Exp[x]/(1 + x^3), {x, 0, nmax}], x] Range[0, nmax]!
  • PARI
    a(n) = n!*sum(k=0, n\3, (-1)^k / (n-3*k)!); \\ Michel Marcus, Sep 18 2020

Formula

G.f.: Sum_{k>=0} (-1)^k * (3*k)! * x^(3*k) / (1 - x)^(3*k+1).
E.g.f.: exp(x) / (1 + x^3).
a(0) = a(1) = a(2) = 1; a(n) = 1 - n * (n-1) * (n-2) * a(n-3).
Showing 1-2 of 2 results.