%I #4 Jul 11 2020 17:57:09
%S 1,2,2,8,5,4,4,8,6,3,7,3,5,2,2,0,9,0,3,4,4,8,9,9,4,4,9,7,6,8,5,2,9,3,
%T 4,6,5,6,4,4,1,9,1,6,4,5,5,1,8,6,0,2,6,4,1,5,9,0,8,1,9,5,2,4,5,1,0,9,
%U 7,2,7,2,3,4,4,6,8,8,4,6,7,2,9,6,0,0,7
%N Decimal expansion of the radius of a sphere centered on the surface of a unit-radius sphere and dividing it into two parts of equal volume.
%C The solution to the grazing goat problem in three dimensions.
%H Marshall Fraser, <a href="https://www.jstor.org/stable/2686517">The Grazing Goat in n Dimensions</a>, The Two-Year College Mathematics Journal, Vol. 15, No. 2 (1984), pp. 126-134.
%H Mark D. Meyerson, <a href="https://www.jstor.org/stable/2686558">Return of the Grazing Goat in n Dimensions</a>, The College Mathematics Journal, Vol. 15, No. 5 (1984), pp. 430-432.
%H Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/GoatProblem.html">Goat Problem</a>.
%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Goat_problem#The_goat_in_space">Goat problem</a>.
%F The smaller of the 2 real roots of the equation 3*x^4 - 8*x^3 + 8 = 0.
%e 1.228544863735220903448994497685293465644191645518602...
%t RealDigits[x /. Solve[3*x^4 - 8*x^3 + 8 == 0 && x > 0, {x}, Reals][[1]], 10, 100][[1]]
%Y Cf. A019699, A133731.
%K nonn,cons
%O 1,2
%A _Amiram Eldar_, Jul 11 2020
|