A009741 - OEIS

%I #12 Jan 23 2015 18:30:00

%S 0,2,8,48,832,34304,1992704,149382912,14491045888,1792468533248,

%T 275860960329728,51650706246205440,11555611726669152256,

%U 3044203421408056377344,932732257836665756450816

%N Expansion of tan(x)*sin(sinh(x)).

%F a(n) ~ (2*n)! * 4^(n+1) * sin(sinh(Pi/2)) / Pi^(2*n+1). - _Vaclav Kotesovec_, Jan 23 2015

%t Tan[ x ]*Sin[ Sinh[ x ] ] (* Even Part *)

%t nn = 20; Table[(CoefficientList[Series[Sin[Sinh[x]]*Tan[x], {x, 0, 2*nn}], x] * Range[0, 2*nn]!)[[n]], {n, 1, 2*nn+1, 2}] (* _Vaclav Kotesovec_, Jan 23 2015 *)

%K nonn

%O 0,2

%A _R. H. Hardin_

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