|
%I #8 Nov 21 2013 12:46:02
%S -1,1,2,5,-13,-63,-453,1822,9683,174325,-960133,-2767796,-180618579,
%T 1333355779,-2799332651,400791892784,-3944083024649,32532084129049,
%U -1656524167774985,21382796711385164,-305269868753768647
%N E.g.f. log(cosh(x)-log(x+1))= -x+1/2!*x^2+2/3!*x^3+5/4!*x^4-13/5!*x^5...
%t With[{nn=30},Rest[CoefficientList[Series[Log[Cosh[x]-Log[x+1]],{x,0,nn}], x] Range[0,nn]!]] (* _Harvey P. Dale_, Mar 30 2012 *)
%K sign
%O 1,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Offset and additional first term from R. J. Mathar, Dec 22 2011
|
