A010138 Continued fraction for sqrt(52).

7, 4, 1, 2, 1, 4, 14, 4, 1, 2, 1, 4, 14, 4, 1, 2, 1, 4, 14, 4, 1, 2, 1, 4, 14, 4, 1, 2, 1, 4, 14, 4, 1, 2, 1, 4, 14, 4, 1, 2, 1, 4, 14, 4, 1, 2, 1, 4, 14, 4, 1, 2, 1, 4, 14, 4, 1, 2, 1, 4, 14, 4, 1, 2, 1, 4, 14, 4, 1, 2, 1, 4, 14, 4, 1

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn
• cofr

Examples

			7.211102550927978586238442534... = 7 + 1/(4 + 1/(1 + 1/(2 + 1/(1 + ...)))). - _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, 0, 0, 0, 0, 1).

Crossrefs

Cf. A010505 Decimal expansion. - Harry J. Smith, Jun 06 2009

Programs

Mathematica

ContinuedFraction[Sqrt[52],300] (* Vladimir Joseph Stephan Orlovsky, Mar 07 2011 *)
PadRight[{7},120,{14,4,1,2,1,4}] (* Harvey P. Dale, Nov 22 2018 *)

PARI

{ allocatemem(932245000); default(realprecision, 21000); x=contfrac(sqrt(52)); for (n=0, 20000, write("b010138.txt", n, " ", x[n+1])); } \\ Harry J. Smith, Jun 06 2009