A368451 Expansion of e.g.f. exp(-x) / (1 + log(1 - 2*x)/2).
1, 0, 3, 16, 149, 1688, 23159, 371880, 6840553, 141780944, 3268764075, 82963535136, 2298431319293, 69012013452328, 2232249540339103, 77380297793229304, 2861727518793423057, 112465175425532789792, 4680372635423718547027, 205618540216497929458608
Offset: 0
Keywords
Programs
-
PARI
a_vector(n) = my(v=vector(n+1)); for(i=0, n, v[i+1]=(-1)^i+sum(j=1, i, 2^(j-1)*(j-1)!*binomial(i, j)*v[i-j+1])); v;
Formula
a(n) = (-1)^n + Sum_{k=1..n} 2^(k-1) * (k-1)! * binomial(n,k) * a(n-k).