|
| |
|
|
A040622
|
|
Continued fraction for sqrt(648).
|
|
1
|
|
|
|
25, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5, 6, 5, 2, 50, 2, 5
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,1
|
|
|
LINKS
|
Table of n, a(n) for n=0..86.
Index entries for continued fractions for constants
Index entries for linear recurrences with constant coefficients, signature (0, 0, 0, 0, 0, 1).
|
|
|
FORMULA
|
a(n)=(1/18)*{-130*(n mod 6)+23*[(n+1) mod 6]+17*[(n+2) mod 6]+11*[(n+3) mod 6]+5*[(n+4) mod 6]+158*[(n+5) mod 6]}-25*[C(2*n,n) mod 2], with n>=0 [From Paolo P. Lava, May 15 2009]
|
|
|
MAPLE
|
with(numtheory): Digits := 300: convert(evalf(sqrt(648)), confrac);
|
|
|
MATHEMATICA
|
ContinuedFraction[Sqrt[648], 90] (* or *) PadRight[{25}, 90, {50, 2, 5, 6, 5, 2}] (* Harvey P. Dale, Aug 10 2012 *)
|
|
|
CROSSREFS
|
Sequence in context: A040620 A040621 A006852 * A040623 A317470 A094582
Adjacent sequences: A040619 A040620 A040621 * A040623 A040624 A040625
|
|
|
KEYWORD
|
nonn,cofr,easy
|
|
|
AUTHOR
|
N. J. A. Sloane.
|
|
|
STATUS
|
approved
|
| |
|
|
