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 A186503 #13 Feb 07 2025 15:24:22
%S A186503 2,6,4,1,0,6,1,9,1,6,4,8,4,3,9,5,8,0,8,4,1,1,8,3,9,0,0,4,0,6,5,7,9,1,
%T A186503 2,5,4,9,3,0,8,7,3,2,2,4,6,0,5,9,4,9,6,6,7,7,1,5,2,7,2,7,2,4,0,4,8,1,
%U A186503 8,9,5,4,6,4,0,1,5,3,1,0,4,1,9,9,5,1,3,5,4,0,2,1,3,5,2,8,2,8,7,4,6,1
%N A186503 Decimal expansion of the solution x to x^x = 13.
%F A186503 Equals log(13)/LambertW(log(13)). - _Alois P. Heinz_, Jun 16 2021
%e A186503 2.6410619164843958084118390040657912549308732...
%t A186503 x=13;RealDigits[Log[x]/ProductLog[Log[x]],10,103][[1]]
%t A186503 RealDigits[x/.FindRoot[x^x==13,{x,2.6},WorkingPrecision->120],10,120][[1]] (* _Harvey P. Dale_, Feb 07 2025 *)
%Y A186503 Cf. A016636, A030798, A173158, A000038, A173159, A173160, A173161, A173162, A173163, A090625, A186501, A186502, A186504, A344930, A093590.
%K A186503 nonn,cons
%O A186503 1,1
%A A186503 _Vladimir Joseph Stephan Orlovsky_, Feb 22 2011