A040043 Continued fraction for sqrt(51).
7, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7, 14, 7
Offset: 0
Examples
7.1414284285428499979993998... = 7 + 1/(7 + 1/(14 + 1/(7 + 1/(14 + ...)))). - _Harry J. Smith_, Jun 06 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. A010504 Decimal expansion. - Harry J. Smith, Jun 06 2009
Programs
-
Maple
Digits := 100: convert(evalf(sqrt(N)),confrac,90,'cvgts'):
-
Mathematica
ContinuedFraction[Sqrt[51],300] (* Vladimir Joseph Stephan Orlovsky, Mar 07 2011 *) PadRight[{7},120,{14,7}] (* Harvey P. Dale, May 22 2020 *)
-
PARI
{ allocatemem(932245000); default(realprecision, 41000); x=contfrac(sqrt(51)); for (n=0, 20000, write("b040043.txt", n, " ", x[n+1])); } \\ Harry J. Smith, Jun 06 2009