|
|
A009681
|
|
Expansion of tan(sinh(x))*exp(x).
|
|
0
|
|
|
0, 1, 2, 6, 16, 72, 288, 1904, 10368, 89344, 610304, 6445824, 52885504, 660602880, 6324756480, 91175548928, 997700468736, 16301080281088, 200677417680896, 3664597991424000, 50126593037172736, 1011727950085619712
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(n) ~ n! * (1 + (-1)^(n+1) + (1 + (-1)^n)*Pi/sqrt(4+Pi^2)) / (log((Pi + sqrt(4 + Pi^2))/2))^(n+1). - Vaclav Kotesovec, Jan 23 2015
|
|
MATHEMATICA
|
Tan[ Sinh[ x ] ]*Exp[ x ]
CoefficientList[Series[E^x*Tan[Sinh[x]], {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Jan 23 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|