A013127 - OEIS

%I #6 Feb 27 2023 10:52:14

%S 1,0,4,-6,83,-460,5374,-52962,711833,-9731160,156311784,-2676262710,

%T 50867352939,-1037096208564,22896291533210,-539916293280210,

%U 13603842760270129,-363832977079307248,10308592491205055532

%N Expansion of e.g.f.: sec(tanh(x)+log(x+1))=1+4/2!*x^2-6/3!*x^3+83/4!*x^4-460/5!*x^5...

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

%K sign

%O 0,3

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

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