OFFSET
2,1
COMMENTS
Stirling transform of A052882(n)=[0,2,9,52,375,...] is a(n+1)=[0,2,3,20,...]. - Michael Somos, Mar 04 2004
FORMULA
E.g.f.: x*log(1+x)/(1-x). a(n) = 1/2*(-1)^n*n!*(2*(-1)^n*log(2)+Psi(1/2+1/2*n)-Psi(1/2*n)).
a(n) ~ n! * log(2). - Vaclav Kotesovec, Jul 01 2018
MATHEMATICA
Rest[Table[n!Sum[(-1)^(i+1)/i, {i, n-1}], {n, 20}]] (* Harvey P. Dale, Oct 24 2011 *)
PROG
(PARI) a(n)=if(n<0, 0, n!*polcoeff(log(1+x+x*O(x^n))*x/(1-x), n))
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladeta Jovovic, Oct 20 2003
STATUS
approved