login
arctan(sin(x)-sinh(x)) = -2/3!*x^3 - 2/7!*x^7 + 4480/9!*x^9 - 2/11!*x^11 + ...
0

%I #11 Oct 11 2012 14:34:27

%S -2,0,-2,4480,-2,274560,-1076275202,20650240,-595948953602,

%T 3337315890251520,-317541467443202,8443404916271478400,

%U -61468170244569234432002,17796778320664208810880,-497337594356972616069888002,4456181603844910120400213608960

%N arctan(sin(x)-sinh(x)) = -2/3!*x^3 - 2/7!*x^7 + 4480/9!*x^9 - 2/11!*x^11 + ...

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

%K sign

%O 3,1

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

%E More terms from _Harvey P. Dale_, Oct 11 2012