A009222 - OEIS

%I #13 May 03 2024 19:09:58

%S 1,1,1,0,-3,-12,-27,248,2425,-3504,-143031,-115904,8956533,17130688,

%T -618394579,-265254272,46232494321,-452604387072,-3608163168111,

%U 186145181366272,254307747662573,-61549828575435776,15725973912655477

%N Expansion of e.g.f.: exp(sinh(tanh(x))).

%t With[{nn=30},CoefficientList[Series[Exp[Sinh[Tanh[x]]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, May 03 2024 *)

%K sign,easy

%O 0,5

%A _R. H. Hardin_

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

%E Previous Mathematica program replaced and definition clarified by _Harvey P. Dale_, May 03 2024