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 A344930 #22 Apr 18 2022 15:27:59 %S A344930 2,7,1,3,1,6,3,6,0,4,0,0,4,2,3,9,2,0,9,5,7,6,4,0,1,2,7,6,8,2,8,5,0,9, %T A344930 3,7,1,8,7,8,1,8,2,4,9,9,6,7,1,4,5,1,6,0,6,7,3,1,6,3,9,5,1,8,1,4,1,7, %U A344930 5,7,1,4,3,9,6,2,9,0,5,2,3,9,8,1,5,1,1,5,1 %N A344930 Decimal expansion of the real solution to x^x = 15. %C A344930 2.7131636040042392095764012768285093718781... %F A344930 Equals log(15)/W(log(15)), where W(z) is the Lambert W Function. %t A344930 RealDigits[Log[15]/ProductLog[Log[15]], 10, 100][[1]] (* _Amiram Eldar_, Jun 02 2021 *) %t A344930 RealDigits[x/.FindRoot[x^x==15,{x,2.7},WorkingPrecision->120],10,120][[1]] (* _Harvey P. Dale_, Apr 18 2022 *) %Y A344930 Cf. A030798, A173158, A000038, A173159, A173160, A173161, A173162, A173163, A090625, A186501, A186502, A186503, A186504, A093590. %K A344930 nonn,cons %O A344930 1,1 %A A344930 _Christoph B. Kassir_, Jun 02 2021