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

%I #10 Jun 11 2014 14:30:37

%S 1,1,3,12,57,332,2209,16730,140609,1302664,13137441,143354574,

%T 1680017889,21043179068,280310970385,3955899181730,58931602709633,

%U 923925812276752,15201851967182913,261859798838325270

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

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

%K nonn,easy

%O 0,3

%A _R. H. Hardin_

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

%E Previous Mathematica program replaced and definition clarified by _Harvey P. Dale_, Jun 11 2014