|
| |
|
|
A040006
|
|
Continued fraction for sqrt(10).
|
|
6
|
|
|
|
3, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,1
|
|
|
COMMENTS
|
Eventual period is (6) [Zak Seidov, Mar 05 2011]
|
|
|
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)=6-3*[C(2*n,n) mod 2], with n>=0 [From Paolo P. Lava, Jun 11 2009]
|
|
|
EXAMPLE
|
3.162277660168379331998893544... = 3 + 1/(6 + 1/(6 + 1/(6 + 1/(6 + ...)))) [From Harry J. Smith, Jun 02 2009]
|
|
|
MAPLE
|
Digits := 100: convert(evalf(sqrt(N)), confrac, 90, 'cvgts'):
|
|
|
MATHEMATICA
|
ContinuedFraction[Sqrt[10], 300] (*From Vladimir Joseph Stephan Orlovsky, Mar 04 2011*)
|
|
|
PROG
|
(PARI) { allocatemem(932245000); default(realprecision, 33000); x=contfrac(sqrt(10)); for (n=0, 20000, write("b040006.txt", n, " ", x[n+1])); } [From Harry J. Smith, Jun 02 2009]
|
|
|
CROSSREFS
|
Cf. A010467 Decimal expansion. [From Harry J. Smith, Jun 02 2009]
Sequence in context: A179949 A187601 A113737 * A155067 A094011 A161645
Adjacent sequences: A040003 A040004 A040005 * A040007 A040008 A040009
|
|
|
KEYWORD
|
nonn,cofr,easy
|
|
|
AUTHOR
|
N. J. A. Sloane.
|
|
|
STATUS
|
approved
|
| |
|
|