A009353 - OEIS

%I #13 Jun 22 2015 22:19:27

%S 0,1,1,3,0,20,-85,637,-5096,46944,-484401,5544341,-69697672,954728788,

%T -14155260197,225856326165,-3858874322928,70293211672352,

%U -1359957800892673,27849583539856909,-601828107666316064

%N Expansion of log(1+sinh(x))*exp(x).

%F a(n) ~ (n-1)! * (-1)^(n+1) * (sqrt(2)-1) / (log(1+sqrt(2)))^n. - _Vaclav Kotesovec_, Jan 23 2015

%t Log[ 1+Sinh[ x ] ]*Exp[ x ]

%t CoefficientList[Series[E^x*Log[1 + Sinh[x]], {x, 0, 20}], x] * Range[0, 20]! (* _Vaclav Kotesovec_, Jan 23 2015 *)

%K sign,easy

%O 0,4

%A _R. H. Hardin_

%E Extended with signs by _Olivier Gérard_, Mar 15 1997