%I #13 Jun 22 2015 22:28:09
%S 0,1,-3,10,-40,205,-1287,9714,-85384,859889,-9751651,123102098,
%T -1711387808,25985945453,-427828028695,7591346835562,-144408464041712,
%U 2931676572255297,-63262735545686819,1445955290624608506
%N Expansion of log(1+tan(x))/exp(x).
%F a(n) ~ (n-1)! * (-1)^(n+1) * exp(Pi/4) * (4/Pi)^n. - _Vaclav Kotesovec_, Jan 23 2015
%t Log[ 1+Tan[ x ] ]/Exp[ x ]
%t CoefficientList[Series[Log[1 + Tan[x]]/E^x, {x, 0, 20}], x] * Range[0, 20]! (* _Vaclav Kotesovec_, Jan 23 2015 *)
%K sign,easy
%O 0,3
%A _R. H. Hardin_
%E Extended with signs by _Olivier GĂ©rard_, Mar 15 1997
|