%I #12 Jun 22 2015 22:43:00
%S 0,1,-1,1,2,-29,194,-1049,4472,-6299,-171736,2993101,-34111408,
%T 302131831,-1763868016,-4643279549,370023946112,-7698953963639,
%U 115221639807104,-1282442213912999,6786946897932032,150369505621009291
%N Expansion of tanh(log(1+sinh(x))).
%t With[{nn=30},CoefficientList[Series[Tanh[Log[1+Sinh[x]]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, May 29 2013 *)
%K sign,easy
%O 0,5
%A _R. H. Hardin_
%E Extended with signs by _Olivier GĂ©rard_, Mar 15 1997