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.

A380646 Expansion of e.g.f. (1/x) * Series_Reversion( x * exp(-2*x)/(1 + x)^2 ).

Original entry on oeis.org

1, 4, 46, 932, 27568, 1080432, 52916176, 3115326496, 214470890496, 16914853191680, 1504252282653184, 148956086481767424, 16256865070022066176, 1938988214539948730368, 250943399365390735104000, 35026523834624205803491328, 5245178283068781060488298496, 838841884254236846183525646336
Offset: 0

Views

Author

Seiichi Manyama, Feb 06 2025

Keywords

Crossrefs

Programs

  • Mathematica
    nmax=18; CoefficientList[(1/x)InverseSeries[Series[x*Exp[-2*x]/(1 + x)^2 ,{x,0,nmax}]],x]Range[0,nmax-1]! (* Stefano Spezia, Feb 06 2025 *)
  • PARI
    a(n) = 2*n!*sum(k=0, n, (2*n+2)^(k-1)*binomial(2*n+2, n-k)/k!);

Formula

E.g.f. A(x) satisfies A(x) = (1 + x*A(x))^2 * exp(2 * x * A(x)).
E.g.f.: B(x)^2, where B(x) is the e.g.f. of A377892.
a(n) = 2 * n! * Sum_{k=0..n} (2*n+2)^(k-1) * binomial(2*n+2,n-k)/k!.

A380647 Expansion of e.g.f. (1/x) * Series_Reversion( x * exp(-3*x)/(1 + x)^3 ).

Original entry on oeis.org

1, 6, 105, 3246, 146637, 8780688, 657224901, 59140486800, 6223651526457, 750357182131200, 102014741343847329, 15443915464974191616, 2576937457466957107845, 469914373917914931984384, 92982800086882512621716925, 19843243096453465663599962112, 4543276116844426827394718716401
Offset: 0

Views

Author

Seiichi Manyama, Feb 06 2025

Keywords

Crossrefs

Programs

  • Mathematica
    nmax=17; CoefficientList[(1/x)InverseSeries[Series[x*Exp[-3*x]/(1 + x)^3 ,{x,0,nmax}]],x]Range[0,nmax-1]! (* Stefano Spezia, Feb 06 2025 *)
  • PARI
    a(n) = 3*n!*sum(k=0, n, (3*n+3)^(k-1)*binomial(3*n+3, n-k)/k!);

Formula

E.g.f. A(x) satisfies A(x) = (1 + x*A(x))^3 * exp(3 * x * A(x)).
E.g.f.: B(x)^3, where B(x) is the e.g.f. of A377893.
a(n) = 3 * n! * Sum_{k=0..n} (3*n+3)^(k-1) * binomial(3*n+3,n-k)/k!.
Showing 1-2 of 2 results.