%I
%S 1,9,2,6,3,0,3,2,1,9,9,1,2,4,3,9,6,7,7,0,6,7,8,1,0,5,7,8,9,5,5,4,4,3,
%T 5,1,5,2,0,0,9,1,2,6,5,3,9,7,2,6,9,7,9,3,6,0,6,9,8,2,5,6,0,8,7,7,3,3,
%U 9,5,1,7,0,2,5,4,2,3,6,7,7,2,4,7,3,5
%N Decimal expansion of the greatest real zero of x^4  4*x^2  x + 3.
%C Let (d(n)) = (2,1,2,1,2,1,...), s(n) = (s(n1) + d(n))^(1/2) for n > 0, and s(0) = 1.
%C Then s(2n) > 1.9263032199..., as in A298852;
%C s(2n+1) > 1.710644095..., as in A298853;
%H Clark Kimberling, <a href="/A298852/b298852.txt">Table of n, a(n) for n = 1..10000</a>
%e Greatest real zero = 1.9263032199...
%t r = x /. NSolve[x^4  4 x^2  x + 3 == 0, x, 10000][[4]];
%t RealDigits[r][[1]]; (* A298852 *)
%Y Cf. A298853.
%K nonn,easy,cons
%O 1,2
%A _Clark Kimberling_, Feb 13 2018
