|
|
A009629
|
|
Expansion of sinh(x)/cos(log(1+x)).
|
|
0
|
|
|
0, 1, 0, 4, -12, 91, -660, 5902, -59528, 677353, -8557560, 118927656, -1802780100, 29602064259, -523414634652, 9915150539946, -200333301044880, 4300435439719377, -97740817953852528, 2344794532033126188
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
FORMULA
|
a(n) ~ n! * (-1)^(n+1) * sinh(1-exp(-Pi/2)) / ((exp(Pi/2)-1) * (1-exp(-Pi/2))^n). - Vaclav Kotesovec, Jan 23 2015
|
|
MATHEMATICA
|
Sinh[ x ]/Cos[ Log[ 1+x ] ]
CoefficientList[Series[Sec[Log[1 + x]]*Sinh[x], {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Jan 23 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|