login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Expansion of e.g.f.: tanh(log(1+tanh(x))).
0

%I #14 Jun 22 2015 22:42:35

%S 0,1,-1,-2,14,-14,-286,1828,3464,-130664,619304,7421008,-128214736,

%T 153779536,18052524944,-209102239712,-1370716606336,63200892286336,

%U -414519986847616,-12766540334296832,303340786629265664

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

%t With[{nn=30},CoefficientList[Series[Tanh[Log[1+Tanh[x]]],{x,0,nn}],x]Range[0,nn]!] (* _Harvey P. Dale_, Aug 17 2012 *)

%K sign,easy

%O 0,4

%A _R. H. Hardin_

%E Extended with signs by _Olivier GĂ©rard_, Mar 15 1997

%E Definition clarified by _Harvey P. Dale_, Aug 17 2012