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

%I #12 Aug 08 2023 17:11:27

%S 2,6,7,8,5,2,3,4,8,5,8,9,1,2,9,9,5,8,1,3,0,1,1,9,9,0,0,1,0,0,9,9,5,0,

%T 6,1,5,7,7,8,6,9,9,1,7,5,5,6,1,7,3,6,5,7,7,8,6,0,8,7,2,5,0,8,8,2,3,9,

%U 9,0,0,6,9,2,8,6,8,7,8,9,9,6,2,9,4,7,4,8,7,5,1,0,0,7,1,3,8,4,0,9,1,5

%N Decimal expansion of the solution x to x^x = 14.

%e 2.6785234858912995813011990010099506157786992..

%t x=14;RealDigits[Log[x]/ProductLog[Log[x]],10,200][[1]]

%t RealDigits[x/.FindRoot[x^x==14,{x,2},WorkingPrecision->120]][[1]] (* _Harvey P. Dale_, Aug 08 2023 *)

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

%K nonn,cons

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Feb 22 2011