|
|
A012710
|
|
Expansion of e.g.f. sin(arctanh(x) * exp(x)).
|
|
0
|
|
|
0, 1, 2, 4, 0, -60, -680, -5504, -45696, -356080, -2998112, -23985216, -210124288, -1616818112, -13420660864, -52229820928, 283969097728, 28575615328512, 648822348255744, 17074162547880960, 350789663754797056
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
Table of n, a(n) for n=0..20.
|
|
EXAMPLE
|
x + 2/2!*x^2 + 4/3!*x^3 - 60/5!*x^5 - 680/6!*x^6 ...
|
|
MATHEMATICA
|
With[{nn=20}, CoefficientList[Series[Sin[ArcTanh[x]Exp[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Jun 07 2019 *)
|
|
CROSSREFS
|
Sequence in context: A012716 A173220 A012362 * A333367 A287761 A009512
Adjacent sequences: A012707 A012708 A012709 * A012711 A012712 A012713
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Patrick Demichel (patrick.demichel(AT)hp.com)
|
|
EXTENSIONS
|
a(0) inserted and title improved by Sean A. Irvine, Jul 24 2018
|
|
STATUS
|
approved
|
|
|
|