A013233 - OEIS

%I #8 Oct 14 2019 20:45:50

%S 1,0,0,0,-3,10,-100,525,-4935,32940,-339750,2618275,-30387775,

%T 251013750,-3301268100,26222434875,-400587471375,2197651183000,

%U -45694778418250,-233584427890125,-1331937583104375

%N Expansion of e.g.f.: sech(log(x+1)-arcsin(x))=1-3/4!*x^4+10/5!*x^5-100/6!*x^6+525/7!*x^7...

%t With[{nn=30},CoefficientList[Series[Sech[Log[x+1]-ArcSin[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Oct 14 2019 *)

%K sign

%O 0,5

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

%E Definition clarified by _Harvey P. Dale_, Oct 14 2019