|
| |
|
|
A009333
|
|
Expansion of log(1+sin(x))*cosh(x).
|
|
0
|
|
|
|
0, 1, -1, 4, -8, 20, -61, 208, -888, 4304, -24001, 149312, -1028048, 7745088, -63374221, 559452416, -5299033488, 53597321472, -576514338721, 6570832389120, -79100066353208, 1002840464045056, -13355627237749501, 186406420596609024
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,4
|
|
|
LINKS
|
|
|
|
FORMULA
|
a(n) ~ (n-1)! * (-1)^(n+1) * cosh(Pi/2) * 2^(n+1) / Pi^n. - Vaclav Kotesovec, Jan 23 2015
|
|
|
MATHEMATICA
|
Log[ 1+Sin[ x ] ]*Cosh[ x ]
CoefficientList[Series[Cosh[x]*Log[1 + Sin[x]], {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Jan 23 2015 *)
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
sign,easy
|
|
|
AUTHOR
|
|
|
|
EXTENSIONS
|
|
|
|
STATUS
|
approved
|
| |
|
|
