%I #16 Feb 13 2018 04:15:27
%S 0,2,12,118,1880,63274,4010212,332200222,32100167600,3749943333714,
%T 559340287979196,106082041802123974,24279253761809428744,
%U 6438550081937270152314,1958379738778789723419028
%N Expansion of e.g.f. tan(x)*tan(sin(x)), even powers only.
%H G. C. Greubel, <a href="/A009748/b009748.txt">Table of n, a(n) for n = 0..240</a>
%t With[{nmax = 50}, CoefficientList[Series[Tan[x]*Tan[Sin[x]], {x, 0, nmax} ], x]*Range[0, nmax]!][[1 ;; ;; 2]] (* _G. C. Greubel_, Feb 12 2018 *)
%o (PARI) x='x+O('x^50); v=Vec(serlaplace(tan(x)*tan(sin(x)))); concat([0], vector(#v\2,n,v[2*n-1])) \\ _G. C. Greubel_, Feb 12 2018
%K nonn
%O 0,2
%A _R. H. Hardin_
%E Extended and signs tested by _Olivier GĂ©rard_, Mar 15 1997