A010147 Continued fraction for sqrt(67).
8, 5, 2, 1, 1, 7, 1, 1, 2, 5, 16, 5, 2, 1, 1, 7, 1, 1, 2, 5, 16, 5, 2, 1, 1, 7, 1, 1, 2, 5, 16, 5, 2, 1, 1, 7, 1, 1, 2, 5, 16, 5, 2, 1, 1, 7, 1, 1, 2, 5, 16, 5, 2, 1, 1, 7, 1, 1, 2, 5, 16, 5, 2, 1, 1, 7, 1, 1, 2, 5, 16, 5, 2, 1, 1, 7, 1, 1
Offset: 0
Examples
8.185352771872449969953703724... = 8 + 1/(5 + 1/(2 + 1/(1 + 1/(1 + ...)))). - _Harry J. Smith_, Jun 08 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, 0, 0, 0, 0, 0, 0, 0, 0, 1).
Crossrefs
Cf. A010519 Decimal expansion. - Harry J. Smith, Jun 08 2009
Programs
-
Mathematica
ContinuedFraction[Sqrt[67],300] (* Vladimir Joseph Stephan Orlovsky, Mar 08 2011 *) PadRight[{8},120,{16,5,2,1,1,7,1,1,2,5}] (* Harvey P. Dale, Jun 02 2025 *)
-
PARI
{ allocatemem(932245000); default(realprecision, 21000); x=contfrac(sqrt(67)); for (n=0, 20000, write("b010147.txt", n, " ", x[n+1])); } \\ Harry J. Smith, Jun 08 2009