A012710 - OEIS

%I #9 Jun 07 2019 17:54:20

%S 0,1,2,4,0,-60,-680,-5504,-45696,-356080,-2998112,-23985216,

%T -210124288,-1616818112,-13420660864,-52229820928,283969097728,

%U 28575615328512,648822348255744,17074162547880960,350789663754797056

%N Expansion of e.g.f. sin(arctanh(x) * exp(x)).

%e x + 2/2!*x^2 + 4/3!*x^3 - 60/5!*x^5 - 680/6!*x^6 ...

%t With[{nn=20},CoefficientList[Series[Sin[ArcTanh[x]Exp[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jun 07 2019 *)

%K sign

%O 0,3

%A Patrick Demichel (patrick.demichel(AT)hp.com)

%E a(0) inserted and title improved by _Sean A. Irvine_, Jul 24 2018