%I #15 Jan 27 2014 09:12:47
%S 1,1,1,6,21,92,597,3472,26537,209488,1834249,17750304,180938109,
%T 2024471360,23781199197,300235771648,3989919982673,56114783183104,
%U 830092069266577,12879188611161600,209479116176732901,3554985326516636672
%N Expansion of exp(tan(x)*cosh(x)).
%t CoefficientList[Series[Exp[Tan[x]*Cosh[x]],{x,0,20}],x]Range[0,20]! (* _Harvey P. Dale_, Jul 25 2011 *)
%K nonn,easy
%O 0,4
%A _R. H. Hardin_
%E Extended and signs tested Mar 15 1997 by _Olivier GĂ©rard_.