%I #15 Jun 23 2015 21:41:39
%S 0,1,1,2,-8,-11,-19,846,-1896,-111,-228159,2453010,-11353440,
%T 173733429,-3565851587,41759789358,-501111404080,9579604130881,
%U -176443305192159,2870638703204994,-53275482352387864,1134671091039714069
%N Expansion of log(1+x)*exp(tanh(x)).
%F a(n) ~ (n-1)! * (-1)^(n+1) * exp(-tanh(1)). - _Vaclav Kotesovec_, Jan 23 2015
%t Log[ 1+x ]*Exp[ Tanh[ x ] ]
%t CoefficientList[Series[E^Tanh[x]*Log[1 + 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