%I #11 Jul 21 2012 11:26:47
%S 0,1,-2,3,-12,65,-392,2723,-23072,226785,-2475392,29857443,-397554432,
%T 5785047905,-91112993792,1544546456963,-28059800686592,
%U 543833037679425,-11198270349934592,244141035610073283
%N E.g.f.: log(tanh(x)+cos(x))=x-2/2!*x^2+3/3!*x^3-12/4!*x^4+65/5!*x^5...
%t With[{nn=20},CoefficientList[Series[Log[Tanh[x]+Cos[x]],{x,0,nn}],x]Range[0,nn]!] (* _Harvey P. Dale_, Jul 21 2012 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Jul 21 2012
|