login
A009332
Expansion of log(1+sin(x))*cos(x).
0
0, 1, -1, -2, 4, 0, -1, -16, 64, -256, 1319, -7680, 49204, -346112, 2653559, -22022144, 196707424, -1881735168, 19194804719, -207983607808, 2385684870724, -28880901505024, 367985503366799, -4922617151619072, 68980888889771104
OFFSET
0,4
FORMULA
a(n) ~ (n-1)! * (-1)^n * 2^n / (n * Pi^(n-1)). - Vaclav Kotesovec, Jan 23 2015
MATHEMATICA
Log[ 1+Sin[ x ] ]*Cos[ x ]
CoefficientList[Series[Cos[x]*Log[1 + Sin[x]], {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Jan 23 2015 *)
CROSSREFS
Sequence in context: A302937 A363367 A005657 * A333184 A045872 A154463
KEYWORD
sign,easy
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
STATUS
approved