login
sec(log(x+1)-sinh(x))=1+3/4!*x^4-10/5!*x^5+100/6!*x^6-693/7!*x^7...
0

%I #6 Dec 13 2012 15:25:04

%S 1,0,0,0,3,-10,100,-693,6433,-59652,656934,-7661335,99643159,

%T -1389188502,20999144296,-338912370405,5846415568641,-107035268122024,

%U 2076101997603994,-42490682821565523

%N sec(log(x+1)-sinh(x))=1+3/4!*x^4-10/5!*x^5+100/6!*x^6-693/7!*x^7...

%t With[{nn=20},CoefficientList[Series[Sec[Log[x+1]-Sinh[x]],{x,0,nn}],x]Range[0,nn]!] (* _Harvey P. Dale_, Dec 13 2012 *)

%K sign

%O 0,5

%A Patrick Demichel (patrick.demichel(AT)hp.com)