A012591 - OEIS

%I #12 Oct 31 2013 09:49:11

%S 0,1,2,0,-24,-140,-200,5096,63616,282192,-3220832,-80931136,

%T -710613376,3394272960,211897855104,3116854010752,2173449924608,

%U -951933369204480,-22125765748465152,-140624117764880384

%N tanh(arcsinh(x)*exp(x)) = x+2/2!*x^2-24/4!*x^4-140/5!*x^5-200/6!*x^6...

%t With[{nn=20},Rest[CoefficientList[Series[Tanh[ArcSinh[x]Exp[x]],{x,0,nn}], x]Range[0,nn]!]] (* _Harvey P. Dale_, Mar 28 2012 *)

%K sign

%O 0,3

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

%E Prepended missing a(0)=0 from _Vaclav Kotesovec_, Oct 31 2013