login
sinh(arctanh(x)*cos(x))=x+504/7!*x^7+24384/9!*x^9+2375296/11!*x^11...
0

%I #8 Nov 21 2013 12:46:01

%S 1,0,0,504,24384,2375296,338479232,64501554688,16130341302272,

%T 5112670099460096,2003580047549120512,951418445045046378496,

%U 538352433444301745848320,357916525207050277213175808

%N sinh(arctanh(x)*cos(x))=x+504/7!*x^7+24384/9!*x^9+2375296/11!*x^11...

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

%K nonn,easy

%O 0,4

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