A012967 - OEIS

%I #11 Mar 13 2014 02:54:06

%S 0,2,-1,-16,42,500,-3210,-31960,409640,3197360,-78190200,-405352000,

%T 20714298000,39783504800,-7213870190800,15836666456000,

%U 3165414330000000,-23690623723936000,-1688397526908144000

%N E.g.f.: tanh(arctan(x)+log(x+1))=2*x-1/2!*x^2-16/3!*x^3+42/4!*x^4+500/5!*x^5...

%H Vincenzo Librandi, <a href="/A012967/b012967.txt">Table of n, a(n) for n = 0..100</a>

%t With[{nn=20},CoefficientList[Series[Tanh[ArcTan[x]+Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Mar 11 2014 *)

%K sign

%O 0,2

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

%E Zero prepended and definition clarified by _Harvey P. Dale_, Mar 11 2014