login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

E.g.f.: log(sech(x)+sinh(x))=x-2/2!*x^2+6/3!*x^3-20/4!*x^4+120/5!*x^5...
0

%I #6 May 16 2014 08:36:08

%S 0,1,-2,6,-20,120,-872,7056,-68000,758400,-9460352,130918656,

%T -1995073280,33173038080,-597457144832,11587651270656,

%U -240799724687360,5337660866396160,-125711013390221312

%N E.g.f.: log(sech(x)+sinh(x))=x-2/2!*x^2+6/3!*x^3-20/4!*x^4+120/5!*x^5...

%t With[{nn=20},CoefficientList[Series[Log[Sech[x]+Sinh[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, May 16 2014 *)

%K sign

%O 0,3

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

%E Definition clarified and zero prepended by _Harvey P. Dale_, May 16 2014