A281143 - OEIS

%I #20 Jan 17 2017 12:31:26

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

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

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

%N Decimal expansion of 10!^(1/10).

%C Base b such that log_b 10! = 10.

%C Inspired by the idea of utilizing the log scaled to 10! being 10, i.e., log_b 10! = 10, therefore b = 2^(4/5)*3^(2/5)*5^(1/5)*7^(1/10).

%F Equals A011101 * A011094 * A005534 * A011092.

%e 4.52872868811676476220330933719550879349863167608939046288611476046926255...

%t RealDigits[2^(4/5) 3^(2/5) 5^(1/5) 7^(1/10), 10, 111][[1]] (* or *)

%t RealDigits[Solve[Log[b, 10!] == 10, b][[1, 1, 2]], 10, 105][[1]]

%Y Cf. A002193, A005486, A005534, A011020, A011092, A011094, A011101.

%K nonn,cons,easy

%O 1,1

%A _Robert G. Wilson v_, Jan 15 2017