login
Decimal expansion of Thue constant.
0

%I #13 Jul 29 2015 01:26:35

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

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

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

%N Decimal expansion of Thue constant.

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/ThueConstant.html">Thue Constant</a>

%e 0.859099...

%t tm = Nest[ Flatten[# /. {0 -> {1, 1, 1}, 1 -> {1, 1, 0}}] &, {0}, 6]; RealDigits[ FromDigits[{tm, 0}, 2]][[1]][[1 ;; 101]] (* _Jean-François Alcover_, Oct 29 2012, after _Robert G. Wilson v_'s program in A014578 *)

%Y Cf. A014578.

%K nonn,cons

%O 0,1

%A _Eric W. Weisstein_, Aug 18 2002

%E Leading zero removed by _R. J. Mathar_, Feb 05 2009