login

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

Expansion of log(1+log(1+x))*exp(x).
0

%I #14 Jun 21 2015 21:49:12

%S 0,1,0,4,-15,108,-875,8517,-95900,1228777,-17659660,281423800,

%T -4926084031,93966286048,-1940264385995,43119269420549,

%U -1026217122711680,26041836268699721,-701939296463506432,20028165890726106852

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

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

%t Log[ 1+Log[ 1+x ] ]*Exp[ x ]

%t CoefficientList[Series[E^x*Log[1 + 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