A013365 - OEIS

%I #7 Nov 21 2013 12:46:02

%S 1,-23,719,-40039,3522539,-447600515,77667878287,-17678180216111,

%T 5114563630418963,-1833901052655286363,798306636459002471063,

%U -414704864473303294302407,253396539072278830083000859

%N sinh(sin(x)-arctan(x))=1/3!*x^3-23/5!*x^5+719/7!*x^7-40039/9!*x^9...

%t With[{nn=40},Rest[Take[CoefficientList[Series[Sinh[Sin[x]- ArcTan[x]],{x,0,nn}],x]Range[0,nn-1]!,{2,-1,2}]]] (* _Harvey P. Dale_, Oct 19 2011 *)

%K sign

%O 0,2

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