A040073 Continued fraction for sqrt(83).
9, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9, 18, 9
Offset: 0
Examples
9.1104335791442988819456261... = 9 + 1/(9 + 1/(18 + 1/(9 + 1/(18 + ...)))). - _Harry J. Smith_, Jun 10 2009
Links
- Harry J. Smith, Table of n, a(n) for n = 0..20000
- G. Xiao, Contfrac
- Index entries for continued fractions for constants
- Index entries for linear recurrences with constant coefficients, signature (0, 1).
Crossrefs
Cf. A010534 Decimal expansion. - Harry J. Smith, Jun 10 2009
Programs
-
Maple
Digits := 100: convert(evalf(sqrt(N)),confrac,90,'cvgts'):
-
Mathematica
ContinuedFraction[Sqrt[83],300] (* Vladimir Joseph Stephan Orlovsky, Mar 09 2011 *) LinearRecurrence[{0,1},{9,9,18},70] (* or *) PadRight[{9},70,{18,9}] (* Harvey P. Dale, Jan 25 2018 *)
-
PARI
{ allocatemem(932245000); default(realprecision, 45000); x=contfrac(sqrt(83)); for (n=0, 20000, write("b040073.txt", n, " ", x[n+1])); } \\ Harry J. Smith, Jun 10 2009