A390750 Decimal expansion of 2 + sqrt(A058265) + 1/sqrt(A058265).

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

Offset

1,1

Links

Table of n, a(n) for n=1..100.

Zhaoxi Li, Jianfeng Wang, Shi-Mei Ma, and Francesco Belardo, Hoffman program of Laplacian matching polynomials of graphs, Proceedings of the Edinburgh Mathematical Society, pp. 1-18 (2025).

Index entries for algebraic numbers, degree 6.

Formula

Minimal polynomial: x^6 - 12*x^5 + 54*x^4 - 112*x^3 + 104*x^2 - 32*x - 4.

Example

4.09355577138662286321610280572115154008051329933795391845267778557615437796....

Mathematica

A058265:=(CubeRoot[19+3Sqrt[33]]+CubeRoot[19-3Sqrt[33]]+1)/3; (* A058265 *)
RealDigits[2+Sqrt[A058265]+1/Sqrt[A058265], 10, 100][[1]]

Prog

(PARI) polrootsreal(x^6 - 12*x^5 + 54*x^4 - 112*x^3 + 104*x^2 - 32*x - 4)[2] \\ Charles R Greathouse IV, May 19 2026

Crossrefs

Cf. A058265.

Sequence in context: A199000 A339530 A200591 * A133844 A198238 A380776

Adjacent sequences: A390747 A390748 A390749 * A390751 A390752 A390753

Keyword

nonn,cons,easy

Author

Stefano Spezia, Nov 17 2025

Status

approved