login
E.g.f.: cos(sin(x)-arctan(x))=1-10/6!*x^6+1288/8!*x^8-152934/10!*x^10...
0

%I #6 Aug 20 2012 17:29:49

%S 1,0,0,-10,1288,-152934,21982884,-4077409466,972083601136,

%T -292315200462606,108645176948603484,-48996211090048870850,

%U 26383142439992849750056,-16729383446320867555995350

%N E.g.f.: cos(sin(x)-arctan(x))=1-10/6!*x^6+1288/8!*x^8-152934/10!*x^10...

%t With[{nn=30},Take[CoefficientList[Series[Cos[Sin[x]-ArcTan[x]],{x,0,nn}],x]Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Aug 20 2012 *)

%K sign

%O 0,4

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

%E Definition clarified by _Harvey P. Dale_, Aug 20 2012