|
| |
|
|
A040626
|
|
Continued fraction for sqrt(652).
|
|
0
|
|
|
|
25, 1, 1, 6, 1, 3, 1, 3, 2, 5, 1, 16, 5, 1, 1, 1, 1, 2, 12, 2, 1, 1, 1, 1, 5, 16, 1, 5, 2, 3, 1, 3, 1, 6, 1, 1, 50, 1, 1, 6, 1, 3, 1, 3, 2, 5, 1, 16, 5, 1, 1, 1, 1, 2, 12, 2, 1, 1, 1, 1, 5, 16, 1, 5, 2, 3, 1, 3, 1, 6, 1, 1, 50, 1, 1, 6, 1, 3, 1, 3, 2, 5, 1, 16, 5, 1, 1, 1, 1
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,1
|
|
|
LINKS
|
Table of n, a(n) for n=0..88.
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, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).
|
|
|
MAPLE
|
with(numtheory): Digits := 300: convert(evalf(sqrt(652)), confrac);
|
|
|
MATHEMATICA
|
ContinuedFraction[Sqrt[652], 100] (* or *) PadRight[{25}, 100, {50, 1, 1, 6, 1, 3, 1, 3, 2, 5, 1, 16, 5, 1, 1, 1, 1, 2, 12, 2, 1, 1, 1, 1, 5, 16, 1, 5, 2, 3, 1, 3, 1, 6, 1, 1}] (* Harvey P. Dale, Oct 02 2017 *)
|
|
|
CROSSREFS
|
Sequence in context: A040628 A040629 A040627 * A040625 A306454 A203550
Adjacent sequences: A040623 A040624 A040625 * A040627 A040628 A040629
|
|
|
KEYWORD
|
nonn,cofr,easy,less
|
|
|
AUTHOR
|
N. J. A. Sloane.
|
|
|
STATUS
|
approved
|
| |
|
|
