|
%I #10 Jul 27 2018 04:35:31
%S 0,1,-1,4,-6,-7,135,-968,1764,58669,-1068885,10920908,-41078730,
%T -1105690419,31085174939,-413045671712,692738905320,126897371107929,
%U -3901725279332361,61836650105641300,-52537696659319150
%N Expansion of e.g.f. arcsinh(cosh(x) * log(x+1)).
%e x - 1/2!*x^2 + 4/3!*x^3 - 6/4!*x^4 - 7/5!*x^5 ...
%t Range[0, 20]! CoefficientList[ Series[ArcSinh[Cosh[x] Log[x + 1]], {x, 0, 20}], x] (* _Robert G. Wilson v_, Jul 24 2018 *)
%K sign
%O 0,4
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E a(0) inserted and title improved by _Sean A. Irvine_, Jul 24 2018
|
