login
Expansion of log(1+tan(x))*cos(x).
0

%I #14 Jun 22 2015 22:22:13

%S 0,1,-1,1,-8,45,-301,2357,-21608,223769,-2602081,33484713,-473210528,

%T 7282225093,-121272163741,2172791685469,-41680241726768,

%U 852337358029617,-18510436676621281,425474580069715025,-10319766893265298328

%N Expansion of log(1+tan(x))*cos(x).

%F a(n) ~ (n-1)! * (-1)^(n+1) * 2^(2*n-1/2) / Pi^n. - _Vaclav Kotesovec_, Jan 23 2015

%t Log[ 1+Tan[ x ] ]*Cos[ x ]

%t CoefficientList[Series[Cos[x]*Log[1 + Tan[x]], {x, 0, 20}], x] * Range[0, 20]! (* _Vaclav Kotesovec_, Jan 23 2015 *)

%K sign,easy

%O 0,5

%A _R. H. Hardin_

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