%I #15 Jul 29 2018 18:59:24

%S 0,2,-1,-13,42,501,-4410,-41949,837816,5284125,-248270400,-488121291,

%T 104085035208,-402493400001,-57558177252576,685798849437471,

%U 39562885528800480,-935890930678896423,-31753772314067599488

%N Expansion of e.g.f. arctan(arcsin(x) + log(x+1)).

%e 2*x - 1/2!*x^2 - 13/3!*x^3 + 42/4!*x^4 + 501/5!*x^5 ...

%t With[{nn=20},Rest[CoefficientList[Series[ArcTan[ArcSin[x]+Log[x+1]],{x,0,nn}],x]Range[0,nn]!]] (* _Harvey P. Dale_, Mar 27 2012 *)

%K sign

%O 0,2

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

%E a(0)=0 inserted and title improved by _Sean A. Irvine_, Jul 27 2018