|
%I #4 Feb 13 2018 11:41:52
%S 1,4,9,0,9,8,4,7,6,6,5,6,7,5,1,7,5,7,2,3,1,6,2,2,7,7,8,8,8,2,2,6,2,2,
%T 2,8,8,9,3,8,2,5,3,2,4,4,1,4,9,3,1,3,0,6,4,0,7,0,2,1,7,7,3,2,3,1,4,5,
%U 5,4,4,5,8,7,1,4,8,3,8,4,0,7,7,4,6,6
%N Decimal expansion of (1/2)(1 + sqrt(-3 + 4*sqrt(3))).
%H Clark Kimberling, <a href="/A298744/b298744.txt">Table of n, a(n) for n = 1..10000</a>
%e constant = 1.4909847665675175723... = positive zero of x^2 - x + 1 - sqrt(3).
%t r = (1/2)*(1 + Sqrt[-3 + 4 Sqrt[3]])
%t RealDigits[N[r, 100], 10][[1]]; (* A298744 *)
%Y Cf. A298743, A298745.
%K nonn,easy,cons
%O 1,2
%A _Clark Kimberling_, Feb 13 2018
|
