A013120 - OEIS

%I #9 Jul 22 2022 18:33:09

%S 0,2,-1,16,-54,612,-4710,57944,-683144,10015344,-154359720,2701047424,

%T -50673755088,1040194570144,-22870244075952,540441764640064,

%U -13599312731310720,363949691199176448,-10307618997050443392

%N Expansion of e.g.f. tan(tanh(x) + log(x+1)).

%e 2*x - 1/2!*x^2 + 16/3!*x^3 - 54/4!*x^4 + 612/5!*x^5 ...

%t With[{nn=20},CoefficientList[Series[Tan[Tanh[x]+Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jul 22 2022 *)

%K sign

%O 0,2

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

%E a(0)=0 inserted and title improved by _Sean A. Irvine_, Jul 31 2018