|
%I #8 Sep 13 2016 14:29:18
%S 1,0,9,3,3,6,4,1,6,4,2,8,2,3,0,6,6,3,9,9,2,2,4,4,7,7,0,1,1,7,3,0,7,3,
%T 4,6,8,1,6,9,9,5,6,2,3,3,7,4,1,1,1,4,2,6,4,1,1,4,9,7,2,9,9,4,2,0,7,2,
%U 5,9,1,1,8,5,2,3,7,0,8,9,7,5,0,5,2,9,7,5,0,5,4,4,5,4,9,7,9,8,4,7,9,3,3,4,7
%N Decimal expansion of the Hausdorff dimension of the Rauzy fractal boundary.
%C Recipe: find the roots of z^3-z^2-z-1=0. The real one is the tribonacci constant (A058265) and is of no interest here. The other two are complex conjugates; denote their shared magnitude b. Now this constant is the solution of 2*b^(3x)+b^(4x) = 1.
%H Stanislav Sykora, <a href="/A272408/b272408.txt">Table of n, a(n) for n = 1..2000</a>
%H Wikipedia, <a href="http://en.wikipedia.org/wiki/Rauzy_fractal">Rauzy fractal</a>
%e 1.09336416428230663992244770117307346816995623374111426411497299420...
%o (PARI) \\ Using 2010 digits realprecision:
%o b=abs(polroots(Pol([1,-1,-1,-1]))[2]);
%o a=solve(x=1,2,2*b^(3*x)+b^(4*x)-1)
%Y Cf. A058265.
%K nonn,cons,easy
%O 1,3
%A _Stanislav Sykora_, Apr 29 2016
|
