login
Expansion of e.g.f.: exp(tan(sinh(x))).
3

%I #12 Jun 04 2018 18:41:19

%S 1,1,1,4,13,68,373,2528,19097,160400,1522409,15384128,174263717,

%T 2066458176,27072485469,369136141824,5477315064625,84457146691840,

%U 1398343023229393,24053254928131072,439386703590146365

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

%t With[{nn=20},CoefficientList[Series[Exp[Tan[Sinh[x]]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jun 04 2018 *)

%K nonn,easy

%O 0,4

%A _R. H. Hardin_

%E Extended and signs tested Mar 15 1997 by _Olivier GĂ©rard_.

%E Definition clarified and prior Mathematica program replaced by _Harvey P. Dale_, Jun 04 2018