|
%I #12 Oct 24 2017 11:21:00
%S 1,4,36,424,6136,104544,2037856,44549824,1076383296,28423224064,
%T 813041441536,25012265117184,822613038178816,28777151476086784,
%U 1066188308742567936,41680239704335888384,1713629127784250085376,73882449584935612268544
%N E.g.f.: exp(1/(1-x)^4 - 1).
%H Seiichi Manyama, <a href="/A294050/b294050.txt">Table of n, a(n) for n = 0..410</a>
%t nmax = 20; CoefficientList[Series[Exp[1/(1-x)^4 - 1], {x, 0, nmax}], x] * Range[0, nmax]! (* _Vaclav Kotesovec_, Oct 22 2017 *)
%o (PARI) N=66; x='x+O('x^N); Vec(serlaplace(exp(1/(1-x)^4-1)))
%Y Column k=4 of A294046.
%K nonn
%O 0,2
%A _Seiichi Manyama_, Oct 22 2017
|
