A002937 -id:A002937 - cp's OEIS frontend

A160332 Decimal expansion of the one real root of x^3 - 8x - 10.

3, 3, 1, 8, 6, 2, 8, 2, 1, 7, 7, 5, 0, 1, 8, 5, 6, 5, 9, 1, 0, 9, 6, 8, 0, 1, 5, 3, 3, 1, 8, 0, 2, 2, 4, 6, 7, 7, 2, 1, 9, 1, 9, 8, 0, 8, 8, 3, 6, 9, 0, 0, 2, 6, 0, 2, 2, 8, 0, 9, 1, 9, 9, 5, 8, 4, 0, 1, 9, 5, 8, 9, 7, 4, 5, 7, 3, 2, 1, 8, 7, 4, 3, 6, 6, 5, 3, 4, 5, 9, 1, 0, 7, 4, 8, 7, 1, 5, 4, 0, 0, 4, 5, 5, 8

Offset: 1

Harry J. Smith, May 11 2009

			3.31862821775018565910968015331802246772191980883690026022809199584019...

Harry J. Smith, Table of n, a(n) for n = 1..20000
Adam P. Goucher, Exotic continued fractions, 2013.
Index entries for algebraic numbers, degree 3

Cf. A002937 (continued fraction).

RealDigits[x /. FindRoot[x^3 - 8*x - 10, {x, 3}, WorkingPrecision -> 120]][[1]] (* Amiram Eldar, Jun 11 2023 *)

default(realprecision, 20080); x=NULL; p=x^3 - 8*x - 10; rs=polroots(p); r=real(rs[1]); for (n=1, 20000, d=floor(r); r=(r-d)*10; write("b160332.txt", n, " ", d));

sqrtn(5+sqrt(163/27), 3) + sqrtn(5-sqrt(163/27), 3); \\ Michel Marcus, Sep 06 2013

polrootsreal(x^3-8*x-10)[1] \\ Charles R Greathouse IV, Apr 14 2014

Equals (5+sqrt(163/27))^(1/3) + (5-sqrt(163/27))^(1/3).

A229555 An exotic continued fraction for the real root of 6y^3 + 4y^2 - 4y - 7.

Original entry on oeis.org

1, 22, 1, 31, 2, 3, 1, 63, 1, 10, 1, 2, 1, 7, 1, 160905, 2, 1, 4, 58, 2, 2, 1, 2, 1, 7, 3, 1, 3, 1, 4, 3, 1, 47, 1, 214540, 1, 2, 9, 1, 45, 1, 3, 1, 48, 1, 21, 1, 9, 1, 8, 1, 2, 249610, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 20, 1, 4, 19, 1, 2, 1, 1, 1, 1, 3, 4, 1, 1, 1

Offset: 0

Sergei Duzhin, Oct 01 2013

Among its 148 initial numbers, this sequence has 8 unexpectedly big terms which are considerably bigger than those of the well-known exotic sequence A002937. It is peculiar that the ratio of the biggest of these denominators for the two examples, as well as the ratio of the smallest ones, is almost exactly 7: 115270760/16467250 = 7.000000607... and 160905/22986 = 7.000130514...
Deleting the first term in the sequence, we get a continued fraction for the algebraic integer given as the real root of the equation x^3 - 22*x^2 - 22*x - 6 = 0. It has the same set of big denominators, only shifted one position towards the beginning. - Sergei Duzhin, Oct 03 2013
For all integer cubic polynomials a*y^3 + b*y^2 + c*y + d with 0 < a <= 7, |b| <= 7, |c| <= 7, |d| <= 7, the given one (together with its three modifications obtained by a change of one sign and a palindromic reversal of coefficients) is the only polynomial in this set that, among its first 200 denominators, contains a number greater than 10^8, thus establishing a record. - Sergei Duzhin, Oct 04 2013

T. D. Noe, Table of n, a(n) for n = 0..1000

Digits:=500:
with(numtheory):
x:=fsolve(6*y^3 + 4*y^2 - 4*y - 7);
cfrac(x,200,'quotients');

r = Roots[6 x^3 + 4 x^2 - 4 x - 7 == 0, x][[1, 2]]; ContinuedFraction[r, 115] (* T. D. Noe, Oct 02 2013 *)

\p 250
contfrac(real(polroots(Pol([6,4,-4,-7]))[1])) \\ Charles R Greathouse IV, Oct 01 2013

y = ((2906 - 126*sqrt(3*163))^(1/3) + (2906 + 126*sqrt(3*163))^(1/3) - 4) / 18. - Andrey Zabolotskiy, Jan 21 2023

cp's OEIS Frontend

A160332 Decimal expansion of the one real root of x^3 - 8x - 10.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Mathematica

PARI

PARI

PARI

Formula

A229555 An exotic continued fraction for the real root of 6y^3 + 4y^2 - 4y - 7.

Views

Author

Keywords

Comments

Links

Programs

Maple

Mathematica

PARI

Formula