OFFSET
4,1
LINKS
FORMULA
From Natalia L. Skirrow, Nov 30 2025: (Start)
a(n) = (n!/3!) * stirling1(n-1,n-3) = n!*(n-1)*(n-2)*(n-3)*(3*n-4)/144.
E.g.f.: x^4*(2+x)/(6*(1-x)^5). (End)
MATHEMATICA
m = 20;
L[x_] = Log[1-x] + O[x]^m // Normal;
A[_] = 0;
Do[A[x_] = x y - x L[A[x]] + O[x]^k // Normal // Expand, {k, m}];
Drop[(SeriesCoefficient[#, {y, 0, 3}]& /@ CoefficientList[A[x], x]) * Range[0, m-1]!, 4] (* Jean-François Alcover, Nov 01 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Christian G. Bower, May 15 2000
STATUS
approved
