|
%I #8 Dec 20 2023 08:03:23
%S 1,-1,3,0,32,182,1882,20500,260136,3701968,58565360,1019110848,
%T 19346296752,397867297136,8811800026928,209100451072672,
%U 5292665533921024,142338738348972672,4053176346277660288,121828547313861426176,3854597854165079424768
%N Expansion of e.g.f. exp(-2*x) / (1 + log(1 - x)).
%F a(n) = (-2)^n + Sum_{k=1..n} (k-1)! * binomial(n,k) * a(n-k).
%o (PARI) a_vector(n) = my(v=vector(n+1)); for(i=0, n, v[i+1]=(-2)^i+sum(j=1, i, (j-1)!*binomial(i, j)*v[i-j+1])); v;
%Y Cf. A007840, A291979, A330149, A368283.
%K sign
%O 0,3
%A _Seiichi Manyama_, Dec 19 2023
|
