login
Decimal expansion of the solution x to x^x = 13.
4

%I #11 Jun 16 2021 08:46:31

%S 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 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 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 Decimal expansion of the solution x to x^x = 13.

%F Equals log(13)/LambertW(log(13)). - _Alois P. Heinz_, Jun 16 2021

%e 2.6410619164843958084118390040657912549308732...

%t x=13;RealDigits[Log[x]/ProductLog[Log[x]],10,103][[1]]

%Y Cf. A016636, A030798, A173158, A000038, A173159, A173160, A173161, A173162, A173163, A090625, A186501, A186502, A186504, A344930, A093590.

%K nonn,cons

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Feb 22 2011