login

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

Expansion of log(1 + tanh(x))/cos(x).
2

%I #18 Oct 14 2022 11:59:07

%S 0,1,-1,3,-4,25,-61,427,-1184,12465,-49201,555731,-2361844,35135945,

%T -191422141,2990414715,-17147588384,329655706465,-2289437638081,

%U 45692713833379,-329955144475204,7777794952988025,-65643617893832221

%N Expansion of log(1 + tanh(x))/cos(x).

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

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

%Y a(2n+1) = A009843(n), |a(2n)| = A009391(2n).

%K sign,easy

%O 0,4

%A _R. H. Hardin_

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

%E Incorrect Mathematica program deleted by _Harvey P. Dale_, Oct 14 2022