A012739 - OEIS

%I #6 Nov 04 2015 17:02:29

%S 1,-2,20,-16,14096,887456,126998976,21834514688,5067177011456,

%T 1485621376751104,540527763829711872,238770291840873000960,

%U 125924968135743519723520,78156500138405011699867648

%N sin(arctanh(x)*cos(x))=x-2/3!*x^3+20/5!*x^5-16/7!*x^7+14096/9!*x^9...

%t With[{nn=30},Take[CoefficientList[Series[Sin[ArcTanh[x]Cos[x]],{x,0,nn}],x] Range[0,nn-1]!,{2,-1,2}]] (* _Harvey P. Dale_, Nov 04 2015 *)

%K sign

%O 0,2

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