%I #7 Jul 31 2015 21:24:34
%S 1,0,-1,-1,-1,1,269,157,3277817,-49397,-10365557,-847243693,
%T -328990404361,2359554667,13521593667734879,3119353059383129,
%U 10406829533213819,-22913020177568301829,-1190728098581644927239161,-577358636244139725973
%N Numerator 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 Numerator[ CoefficientList[ Series[3Sin[x]/(2 + Cos[x]), {x, 0, 41}], x]] [[2Range@20]] (* _Robert G. Wilson v_, Jan 21 2006 *)
%Y Cf. A115184.
%K sign,frac
%O 1,7
%A _Eric W. Weisstein_, Jan 15 2006
|