%I #10 Jul 20 2018 03:12:42
%S 0,0,2,-3,4,-20,-82,1701,-13176,102096,-741798,2555685,32996940,
%T -986649300,17351145030,-237817720035,2593221000720,-18017408438400,
%U -162521065585230,10623453347243565,-281538871670714220,5556579737347871820,-89014595698012503330,977317781020921150965
%N Expansion of e.g.f. tanh(arcsinh(x) * log(x+1)).
%H Vincenzo Librandi, <a href="/A012579/b012579.txt">Table of n, a(n) for n = 0..200</a>
%e 2/2!*x^2 - 3/3!*x^3 + 4/4!*x^4 - 20/5!*x^5 ...
%t Range[0, 30]! CoefficientList[Series[Tanh[ArcSinh[x] Log[x+1]], {x, 0, 30}], x] (* _Vincenzo Librandi_, Jul 20 2018 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E a(0) and a(1) inserted and title improved by _Sean A. Irvine_, Jul 19 2018