|
%I #6 Aug 11 2017 14:12:40
%S 1,0,0,0,-12,60,-570,3780,-36288,290304,-3077160,27976080,-325364952,
%T 3125330208,-38076353952,320524495200,-3277240862208,-12892686066816,
%U 851147013155904,-38579486635656576,1000229709289596288
%N Expansion of e.g.f.: cos(arctanh(x)*log(x+1))=1-12/4!*x^4+60/5!*x^5-570/6!*x^6+3780/7!*x^7...
%t With[{nn=20},CoefficientList[Series[Cos[ArcTanh[x]Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Aug 11 2017 *)
%K sign
%O 0,5
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Aug 11 2017
|
