|
%I #11 Feb 29 2016 07:40:50
%S 0,2,0,280,1344,770848,24428800,11463637120,1147515615232,
%T 574163022303744,126865257434619904,74474679925545302016,
%U 29259293718147520839680,21004159848539137867063296
%N tan(arcsin(x)*sin(x))=2/2!*x^2+280/6!*x^6+1344/8!*x^8+770848/10!*x^10...
%H Vaclav Kotesovec, <a href="/A012330/b012330.txt">Table of n, a(n) for n = 0..224</a>
%F a(n) ~ c * (2*n)! / n^(3/2), where c = sin(1)/(sqrt(Pi)*(1 + cos(Pi*sin(1)))) = 3.9081600321945... . - _Vaclav Kotesovec_, Feb 29 2016
%t nn = 20; Table[(CoefficientList[Series[Tan[ArcSin[x]*Sin[x]], {x, 0, 2*nn}], x] * Range[0, 2*nn]!)[[n]], {n, 1, 2*nn+1, 2}] (* _Vaclav Kotesovec_, Feb 06 2015 *)
%K nonn
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E a(0)=0 prepended by _Vaclav Kotesovec_, Feb 06 2015
|
