|
%I #9 Aug 27 2019 09:00:58
%S 0,0,2,-3,0,-10,40,504,-2352,-4824,59008,-2753080,51956960,-457517424,
%T 3806598640,-21282319800,-762122185216,20040705852992,
%U -230870869215744,1622064680555904,59149402039301888
%N Expansion of e.g.f. arcsinh(tanh(x) * log(x+1)).
%e 2/2!*x^2 - 3/3!*x^3 - 10/5!*x^5 + 40/6!*x^6 ...
%t With[{nn=20},CoefficientList[Series[ArcSinh[Tanh[x]Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Aug 27 2019 *)
%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 23 2018
|
