%I #14 Jun 21 2015 21:53:05
%S 1,0,0,0,12,-60,450,-2940,24080,-215712,2245320,-25552560,318861576,
%T -4280157024,61675886272,-948295464480,15514105784320,
%U -269094947517824,4934169151898304,-95367032452388736,1937946889478705792
%N E.g.f.: Expansion of cosh(sinh(x)*log(1+x)).
%t With[{nn=30},CoefficientList[Series[Cosh[Sinh[x]Log[1+x]],{x,0,nn}], x]Range[0,nn]!] (* _Harvey P. Dale_, Jun 06 2012 *)
%K sign,easy
%O 0,5
%A _R. H. Hardin_
%E Extended with signs by _Olivier GĂ©rard_, Mar 15 1997
%E Definition clarified by _Harvey P. Dale_, Jun 06 2012