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 A103550 #10 Jul 17 2022 16:07:51 %S A103550 4,6,9,6,2,1,9,2,2,9,3,5,6,1,0,5,4,4,1,1,7,8,0,3,0,6,6,8,9,0,7,9,9,5, %T A103550 9,9,4,3,7,8,5,2,9,2,9,9,8,1,5,5,1,9,2,8,8,0,5,6,3,3,9,2,3,8,6,9,4,9, %U A103550 7,5,8,5,4,0,1,6,8,2,2,3,2,3,3,0,6,4,4,7,5,8,6,7,4,3,5,2,0,4,4,5,5,0,8,6 %N A103550 Decimal expansion of solution to x*5^x=1. %H A103550 Alois P. Heinz, <a href="/A103550/b103550.txt">Table of n, a(n) for n = 0..10000</a> %F A103550 x = 0.4696219229356105441178030... ; x*5^x=1. %F A103550 x = (1/5)^(1/5)^(1/5)^... = LambertW(log(5))/log(5). - _Alois P. Heinz_, Dec 03 2014 %p A103550 x:= LambertW(log(5))/log(5): %p A103550 s:= convert(evalf(x, 140), string): %p A103550 seq(parse(s[n+2]), n=0..120); # _Alois P. Heinz_, Dec 03 2014 %t A103550 First[RealDigits[N[ProductLog[Log[5]]/Log[5],104]]] (* _Stefano Spezia_, Jul 17 2022 *) %K A103550 nonn,cons %O A103550 0,1 %A A103550 _Zak Seidov_, Mar 23 2005 %E A103550 More terms from _Alois P. Heinz_, Dec 03 2014