|
| |
|
|
A013496
|
|
Expansion of e.g.f.: exp(tanh(x)-arctanh(x))=1-4/3!*x^3-8/5!*x^5+160/6!*x^6-992/7!*x^7...
|
|
0
|
|
|
|
1, 0, 0, -4, 0, -8, 160, -992, 1792, -50304, 484224, -4573952, 38725632, -738222080, 8292976640, -127954033664, 1743232565248, -34953731964928, 521161362997248, -10769261343309824, 188842450602393600
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,4
|
|
|
LINKS
|
|
|
|
MATHEMATICA
|
With[{nn=20}, CoefficientList[Series[Exp[Tanh[x]-ArcTanh[x]], {x, 0, nn}], x] Range[ 0, nn]!] (* Harvey P. Dale, Apr 17 2022 *)
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
sign
|
|
|
AUTHOR
|
Patrick Demichel (patrick.demichel(AT)hp.com)
|
|
|
EXTENSIONS
|
|
|
|
STATUS
|
approved
|
| |
|
|
