Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #12 Oct 27 2023 10:40:49
%S 2,6,1,2,8,8,7,8,6,4,7,1,7,5,4,4,7,5,4,4,0,7,2,4,9,9,3,8,6,2,9,7,6,2,
%T 9,1,2,8,7,5,7,7,1,2,8,4,8,0,6,3,2,8,1,7,2,3,0,2,7,0,0,5,1,8,2,1,0,1,
%U 8,3,5,8,4,9,1,1,2,5,7,3,6,3,4,4,2,2,7,1,1,3,9,6,0,1,9,8,4,8,5,6,8,6,7,6,0,3,6,8,1,9,0,6,1,3,2,0,6,7,5,6,3,7,2,8,3,9,8,7,4
%N Decimal expansion of the real root of x^3 - 3*x - 10.
%C This is related to the fourth of thirty problems posed by Niccolò Tartaglia to Antonio Maria Fiore in the year 1535 (in Venice it was still 1534). See the Katscher reference [in German] pp. 14, 15.
%C The problem is: find me a number which when 3 of its cubic roots are subtracted leaves 10. That is z - 3*z^(1/3) = 10, or, with z = x^3, x^3 - 3*x = 10, with real solution x1. The solution to the problem is then z1 = x1^3 = 13 - 4*x1 (see the example section).
%D Friedrich Katscher, Die Kubischen Gleichungen bei Nicolo Tartaglia, Verlag der Ă–sterreichischen Akademie der Wissenschaften, 2001, Wien, Aufgabe XXV, pp. 13-16.
%H MacTutor History of Mathematics, <a href="http://www-history.mcs.st-andrews.ac.uk/Biographies/Tartaglia.html">Nicolo Tartaglia</a>.
%H <a href="/index/Al#algebraic_03">Index entries for algebraic numbers, degree 3</a>
%F The real solution x1 to x^3 - 3*x - 10 = 0 is
%F x1 = (5 + 2*sqrt(6))^(1/3) + (5 - 2*sqrt(6))^(1/3).
%F The two complex solutions are a + b*i and a - b*i, with a = -x1/2 and b = sqrt(3)*y1/2 where y1 = (5 + 2*sqrt(6))^(1/3) - (5 - 2*sqrt(6))^(1/3).
%e x1 = 2.6128878647175447544072499386297629...
%e y1 = 1.6814229074174677895820170587695490...
%e z1 = 17.8386635941526342632217498158892887...
%t RealDigits[Root[x^3-3x-10,1],10,130][[1]] (* _Harvey P. Dale_, Dec 13 2021 *)
%o (PARI) polrootsreal(x^3-3*x-10)[1] \\ _Charles R Greathouse IV_, May 21 2015
%Y Cf. A257235, A257236, A257237, A257239.
%K nonn,easy,cons
%O 1,1
%A _Wolfdieter Lang_, May 21 2015