Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #30 Sep 10 2018 03:02:23
%S 5,5,7,9,1,9,2,8,2,2,5,5,4,1,6,0,4,6,7,7,3,8,6,4,7,3,3,1,3,7,2,8,4,3,
%T 2,5,2,6,8,0,5,9,5,2,2,1,4,7,0,0,0,5,6,8,8,5,6,8,6,1,6,7,8,6,6,5,6,6,
%U 9,1,6,8,0,8,0,0,6,2,9,0,4,7,4,3,6,9,7,5,4,6,6,9,3,4,2,8,0,5,7,8,8,8,4,1,8,2
%N Decimal expansion of the first derivative of the infinite power tower function x^x^x... at x = 1/e.
%H Alois P. Heinz, <a href="/A300916/b300916.txt">Table of n, a(n) for n = 0..10000</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/PowerTower.html">Power Tower</a>
%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Tetration">Tetration</a>
%F Equals exp(1)*exp(-2*LambertW(1))/(1+LambertW(1)).
%e 0.557919282255416046773864733137284325268059522147000568856861678665669168...
%t RealDigits[E*Exp[-2*LambertW[1]]/(1+LambertW[1]), 10, 100][[1]] (* _G. C. Greubel_, Sep 09 2018 *)
%o (PARI) exp(1)*exp(-2*lambertw(1))/(1+lambertw(1)) \\ _Michel Marcus_, Mar 16 2018
%Y Cf. A001113, A030178, A068985, A277522, A277651, A293009.
%K nonn,cons
%O 0,1
%A _Alois P. Heinz_, Mar 16 2018