|
| |
|
|
A040012
|
|
Continued fraction for sqrt(17).
|
|
4
| |
|
|
4, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=0,...,20000
G. Xiao, Contfrac
Index entries for continued fractions for constants
|
|
|
FORMULA
| a(n)=8-4*[C(2*n,n) mod 2], with n>=0 [From Paolo P. Lava (paoloplava(AT)gmail.com), Jun 11 2009]
|
|
|
EXAMPLE
| 4.123105625617660549821409855... = 4 + 1/(8 + 1/(8 + 1/(8 + 1/(8 + ...)))) [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jun 03 2009]
|
|
|
MAPLE
| Digits := 100: convert(evalf(sqrt(N)), confrac, 90, 'cvgts'):
|
|
|
MATHEMATICA
| ContinuedFraction[Sqrt[17], 300] (*From Vladimir Joseph Stephan Orlovsky, Mar 05 2011*)
|
|
|
PROG
| (PARI) { allocatemem(932245000); default(realprecision, 37000); x=contfrac(sqrt(17)); for (n=0, 20000, write("b040012.txt", n, " ", x[n+1])); } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jun 03 2009]
|
|
|
CROSSREFS
| Cf. A010473 Decimal expansion. [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jun 03 2009]
Sequence in context: A032566 A200357 A201405 * A054006 A029679 A141284
Adjacent sequences: A040009 A040010 A040011 * A040013 A040014 A040015
|
|
|
KEYWORD
| nonn,cofr,easy
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com).
|
| |
|
|