This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A103554 #9 May 04 2023 02:35:36 %S A103554 4,0,8,0,0,4,4,0,5,3,7,4,3,8,1,0,0,7,9,7,7,8,0,0,5,3,1,4,4,0,0,9,9,0, %T A103554 1,2,1,5,0,4,5,1,4,1,6,9,0,7,6,0,7,5,4,7,9,6,0,6,4,5,7,8,6,4,5,0,5,7, %U A103554 3,7,0,4,2,6,6,9,3,6,6,3,2,7,4,3,8,2,6,4,5,0,6,3,6,2,9,3,7,9,6,4,7,5,7,4,7,1 %N A103554 Decimal expansion of solution to x*9^x = 1. %F A103554 x*9^x = 1. %F A103554 x = (1/9)^(1/9)^(1/9)^... = LambertW(log(9))/log(9). - _Alois P. Heinz_, Dec 03 2014 %e A103554 0.40800440537438100797780053144009901215045141690760... %p A103554 x:= LambertW(log(9))/log(9): %p A103554 s:= convert(evalf(x, 140), string): %p A103554 seq(parse(s[n+2]), n=0..121); # _Alois P. Heinz_, Dec 03 2014 %t A103554 RealDigits[ProductLog[Log[9]]/Log[9], 10, 105][[1]] (* _Amiram Eldar_, May 04 2023 *) %Y A103554 Cf. A104748, A103549, A103550, A103551, A103552, A103553, A103555, A103556, A103559, A103560. %K A103554 nonn,cons %O A103554 0,1 %A A103554 _Zak Seidov_, Mar 23 2005 %E A103554 More terms from _Alois P. Heinz_, Dec 03 2014