login
Expansion of e.g.f. arcsinh(log(x+1)/exp(x)).
1

%I #17 Mar 15 2023 14:57:10

%S 1,-3,7,-6,-117,1385,-8297,-25956,1648321,-27076303,193866363,

%T 3316610110,-155740823565,3027137980477,-15561540714197,

%U -1235594001526472,54043406644859329,-1102221843621842235

%N Expansion of e.g.f. arcsinh(log(x+1)/exp(x)).

%H G. C. Greubel, <a href="/A013564/b013564.txt">Table of n, a(n) for n = 1..200</a>

%F E.g.f.: arcsinh(log(x+1)/exp(x)).

%e x - 3/2!*x^2 + 7/3!*x^3 - 6/4!*x^4 - 117/5!*x^5 + ...

%t CoefficientList[Series[ArcSin[Log[x + 1]/Exp[x]], {x, 0, 20}], x]*Range[0, 20]! (* _G. C. Greubel_, Nov 13 2016 *)

%K sign

%O 1,2

%A Patrick Demichel (patrick.demichel(AT)hp.com), Dec 11 1996