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 A103551 #10 May 04 2023 02:36:18 %S A103551 4,4,8,0,6,3,0,7,6,6,4,6,3,0,8,8,4,5,1,1,3,7,1,4,4,1,8,4,2,8,5,7,1,5, %T A103551 4,6,6,7,5,6,2,0,3,3,0,0,5,4,1,4,7,6,5,0,1,4,8,8,7,5,5,5,8,2,5,4,7,6, %U A103551 0,6,4,2,6,2,3,4,5,4,9,7,8,2,0,8,4,6,6,1,5,1,3,8,4,4,6,3,2,9,9,2,8,5,1,6,8 %N A103551 Decimal expansion of solution to x*6^x = 1. %F A103551 x*6^x = 1. %F A103551 x = (1/6)^(1/6)^(1/6)^... = LambertW(log(6))/log(6). - _Alois P. Heinz_, Dec 03 2014 %e A103551 0.44806307664630884511371441842857154667562033005414... %p A103551 x:= LambertW(log(6))/log(6): %p A103551 s:= convert(evalf(x, 140), string): %p A103551 seq(parse(s[n+2]), n=0..120); # _Alois P. Heinz_, Dec 03 2014 %t A103551 RealDigits[ProductLog[Log[6]]/Log[6], 10, 105][[1]] (* _Amiram Eldar_, May 04 2023 *) %Y A103551 Cf. A104748, A103549, A103550, A103552, A103553, A103554, A103555, A103556, A103559, A103560. %K A103551 nonn,cons %O A103551 0,1 %A A103551 _Zak Seidov_, Mar 23 2005 %E A103551 More terms from _Alois P. Heinz_, Dec 03 2014