login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A009516
Expansion of sin(tan(x)/cos(x)).
0
1, 4, 12, -1472, -159792, -16362304, -1834702400, -218477736448, -23399883425536, -225490426670080, 1498513205985651712, 985137918553296764928, 536781621147089121005568, 285950922368074600238661632
OFFSET
0,2
MATHEMATICA
Sin[ Tan[ x ]/Cos[ x ] ] (* Odd Part *)
PROG
(Maxima)
a(n):=4*sum(((-1)^(m)*sum((binomial(m+k-1, 2*m)*sum((2*i-2*k+1)^(2*n+1)*binomial(2*k-1, i)*(-1)^(i-n+k), i, 0, k-1/2))/2^(2*k), k, m+1, n+1))/(2*m+1)!, m, 0, n); /* Vladimir Kruchinin, Jun 23 2011 */
CROSSREFS
Sequence in context: A085116 A104129 A144631 * A266500 A146210 A024248
KEYWORD
sign
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
STATUS
approved