|
%I #9 Jul 19 2018 21:19:54
%S 0,0,2,-3,12,-40,430,-3591,37464,-373752,4749658,-65476675,1030634660,
%T -17005495728,307003733062,-5926728736215,123925742441648,
%U -2752109508497296,65023509028085682,-1622290259238643683
%N Expansion of e.g.f. arctanh(sinh(x) * log(x+1)).
%H Muniru A Asiru, <a href="/A012516/b012516.txt">Table of n, a(n) for n = 0..100</a>
%e 2/2!*x^2 - 3/3!*x^3 + 12/4!*x^4 - 40/5!*x^5 ...
%p seq(coeff(series(factorial(n)*arctanh(sinh(x)*log(x+1)), x,n+1),x,n),n=0..20); # _Muniru A Asiru_, Jul 19 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
|
