A012583 - OEIS

%I #6 Feb 20 2023 10:55:30

%S 1,0,0,0,-12,60,-210,1260,-4368,-42336,833880,-9944880,109031208,

%T -998835552,5256888000,57628902240,-2552409700608,53611141985664,

%U -880205240332224,12318269451041664,-115115298914746752

%N Expansion of e.g.f.: sech(arcsinh(x)*log(x+1))=1-12/4!*x^4+60/5!*x^5-210/6!*x^6...

%t With[{nn=20},CoefficientList[Series[Sech[ArcSinh[x]Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Feb 20 2023 *)

%K sign

%O 0,5

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

%E Definition clarified by _Harvey P. Dale_, Feb 20 2023