A013495 - OEIS

%I #7 Jan 15 2015 18:27:34

%S 1,0,1,-4,9,-48,385,-2420,17297,-170688,1760289,-18395012,219987801,

%T -2936841776,40948952993,-606801250484,9752505856033,-166636197964032,

%U 2990053004436417,-56703580249101188

%N Expansion of e.g.f.: exp(tanh(x)-log(x+1))=1+1/2!*x^2-4/3!*x^3+9/4!*x^4-48/5!*x^5...

%t With[{nn=20},CoefficientList[Series[Exp[Tanh[x]-Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jan 15 2015 *)

%K sign

%O 0,4

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

%E Definition clarified by _Harvey P. Dale_, Jan 15 2015