|
%I #7 Jul 31 2015 21:24:59
%S 1,1,180,1512,25920,3991680,849139200,4311014400,1600593426432000,
%T 2146678242508800,576213633515520000,423033001181754163200,
%U 3034801964999540736000000,1329532289428370227200000
%N Denominator of coefficient of x^(2n-1) in series of 3*sin(x)/(2+cos(x)).
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/IdentityFunction.html">Identity Function</a>
%e x - x^5/180 - x^7/1512 - x^9/25920 + x^11/3991680 + (269*x^13)/849139200 + ...
%t Denominator[ CoefficientList[ Series[3Sin[x]/(2 + Cos[x]), {x, 0, 29}], x]] [[2Range@14]] (* _Robert G. Wilson v_, Jan 21 2006 *)
%Y Cf. A115183.
%K nonn,frac
%O 1,3
%A _Eric W. Weisstein_, Jan 15 2006
|
