%I #9 May 01 2013 18:04:49
%S 0,1,-3,10,-51,373,-3305,34543,-421722,5884933,-92262997,1606210571,
%T -30753868288,642299748231,-14531175088131,354020726656465,
%U -9240811268934752,257285058656341145,-7611050202054313081
%N log(sech(x)+log(x+1)) = x - 3/2!*x^2 + 10/3!*x^3 - 51/4!*x^4 + 373/5!*x^5 + ...
%t With[{nn=20},CoefficientList[Series[Log[Sech[x]+Log[x+1]],{x,0,nn}],x] Range[ 0,nn]!] (* _Harvey P. Dale_, May 01 2013 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)