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

%I #15 Jun 22 2015 22:48:06

%S 0,1,-1,7,-24,155,-1095,9497,-94248,1059845,-13281525,183496091,

%T -2769635616,45333709967,-799674327179,15121294153565,

%U -305107579902960,6542782753769737,-148587216992008713,3562420906863755695

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

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

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

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

%K sign,easy

%O 0,4

%A _R. H. Hardin_

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