OFFSET
1,1
COMMENTS
LINKS
FORMULA
Continued fraction (as explained at A188635): [r,r,r,r], where r = 1 + sqrt(2). The ordinary continued fraction (as given by Mathematica program shown below) is as follows: [2,1,3,2,5,76,5,2,3,1,3,1,2,1,1,7,1,10,38,10,...]
Minimal polynomial: 17*x^2 - 18*x - 81. - Amiram Eldar, Jun 06 2026
EXAMPLE
2.7755156578866803716262115031565793012577141550...
MATHEMATICA
r = 1 + 2^(1/2);
FromContinuedFraction[{r, r, r, r}]
FullSimplify[%]
N[%, 150]
RealDigits[%]
(* Alternative: *)
RealDigits[(9+27Sqrt[2])/17, 10, 150][[1]] (* Harvey P. Dale, Dec 22 2019 *)
PROG
(PARI) (9+27*sqrt(2))/17 \\ G. C. Greubel, Jan 13 2018
(Magma) (9+27*Sqrt(2))/17; // G. C. Greubel, Jan 13 2018
CROSSREFS
KEYWORD
AUTHOR
Clark Kimberling, May 02 2011
STATUS
approved
