|
| |
|
|
A065045
|
|
Continued fraction expansion of the constant Product{k=0..inf} (1+1/2^(2k))^(1/2) (A065445).
|
|
2
| |
|
|
1, 1, 1, 1, 4, 1, 10, 1, 3, 3, 1, 2, 10, 1, 1, 1, 13, 1, 18, 1, 1, 2, 16, 1, 223, 1, 2, 3, 2, 6, 56, 1, 3, 5, 3, 14, 1, 8, 1, 1, 8, 135, 8, 1, 1, 2, 6, 1, 3, 2, 5, 6, 3, 1, 2, 1, 12, 1, 1, 72, 2, 2, 1, 4, 1, 10, 1, 2, 14, 1, 2, 1, 1, 2, 6, 2, 10, 9, 47, 1, 9, 3, 3, 1, 2, 5, 2, 1, 5, 1, 1, 3, 15, 1, 2, 2, 8
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,5
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,2000
|
|
|
EXAMPLE
| 1.646760258121065648366051222... = 1 + 1/(1 + 1/(1 + 1/(1 + 1/(4 + ...)))) [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Oct 04 2009]
|
|
|
MATHEMATICA
| ContinuedFraction[ N[ Product[ Sqrt[ (1 + 1/2^(2k) ) ], {k, 0, Infinity} ], 500 ], 100 ]
|
|
|
PROG
| (PARI) { allocatemem(932245000); default(realprecision, 2300); x=contfrac(prodinf(k=0, sqrt(1 + 1/2^(2*k)))); for (n=1, 2000, write("b065045.txt", n, " ", x[n])) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Oct 04 2009]
|
|
|
CROSSREFS
| Cf. A065445.
Sequence in context: A193963 A028941 A176080 * A185088 A064947 A059926
Adjacent sequences: A065042 A065043 A065044 * A065046 A065047 A065048
|
|
|
KEYWORD
| cofr,nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 19 2001
|
|
|
EXTENSIONS
| Terms corrected and terms added by Harry J. Smith (hjsmithh(AT)sbcglobal.net), Oct 04 2009
|
| |
|
|
