login
Expansion of e.g.f.: log(arctanh(x)+cos(x)) = x-2/2!*x^2+7/3!*x^3-28/4!*x^4+193/5!*x^5...
0

%I #6 Jan 12 2016 15:05:12

%S 0,1,-2,7,-28,193,-1400,13319,-139424,1721281,-23379712,357281351,

%T -5951323904,108706678273,-2142923081728,45591739883975,

%U -1037606714249216,25211971076762753,-650452080060399616

%N Expansion of e.g.f.: log(arctanh(x)+cos(x)) = x-2/2!*x^2+7/3!*x^3-28/4!*x^4+193/5!*x^5...

%t With[{nn=20},CoefficientList[Series[Log[ArcTanh[x]+Cos[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jan 12 2016 *)

%K sign

%O 0,3

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

%E Zero prepended and definition clarified by _Harvey P. Dale_, Jan 12 2016