A013125 - OEIS

%I #6 May 27 2018 11:06:22

%S 0,2,-1,-16,42,492,-3210,-30168,404264,2783952,-75206520,-292604288,

%T 19217701008,3111794272,-6389076941520,29520888356032,

%U 2643629755167360,-29037077579992832,-1307061634619873664

%N Expansion of E.g.f.: tanh(tanh(x)+log(x+1))=2*x-1/2!*x^2-16/3!*x^3+42/4!*x^4+492/5!*x^5...

%t With[{nn=20},CoefficientList[Series[Tanh[Tanh[x]+Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, May 27 2018 *)

%K sign

%O 0,2

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

%E Zero prepended and definition clarified by _Harvey P. Dale_, May 27 2018