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.

A298374 Expansion of e.g.f. 1/(1 - x)^exp(-x).

Original entry on oeis.org

1, 1, 0, 0, 6, 15, 65, 595, 4004, 32865, 322307, 3316511, 37845214, 471644173, 6319617369, 91114344217, 1404670896264, 23050054222177, 401305630237239, 7387282161642715, 143360257370842146, 2925289119525173741, 62612350725688075941, 1402681525332544374325
Offset: 0

Views

Author

Ilya Gutkovskiy, Jan 18 2018

Keywords

Comments

Exponential transform of A002741.

Examples

			1/(1 - x)^exp(-x) = 1 + x/1! + 6*x^4/4! + 15*x^5/5! + 65*x^6/6! + 595*x^7/7! + ...
		

Crossrefs

Programs

  • Maple
    a:=series(1/(1-x)^exp(-x),x=0,24): seq(n!*coeff(a,x,n),n=0..23); # Paolo P. Lava, Mar 26 2019
  • Mathematica
    nmax = 23; CoefficientList[Series[1/(1 - x)^Exp[-x], {x, 0, nmax}], x] Range[0, nmax]!
  • PARI
    my(N=30, x='x+O('x^N)); Vec(serlaplace(1/(1-x)^exp(-x))) \\ Seiichi Manyama, May 03 2022

Formula

a(n) ~ n! * n^(exp(-1)-1) / Gamma(exp(-1)). - Vaclav Kotesovec, May 04 2018

A308333 a(n) = n! * [x^n] (1 + x)^exp(n*x).

Original entry on oeis.org

1, 1, 4, 36, 528, 11675, 359640, 14519337, 736902656, 45751463361, 3406549900000, 299204233781497, 30553846336392192, 3582331552631208533, 477188038404378339584, 71582596353063387354375, 12001959362744065545994240, 2234380582272202437600859617
Offset: 0

Views

Author

Ilya Gutkovskiy, May 20 2019

Keywords

Crossrefs

Programs

  • Mathematica
    Table[n! SeriesCoefficient[(1 + x)^Exp[n x], {x, 0, n}], {n, 0, 17}]
Showing 1-2 of 2 results.