|
|
A040953
|
|
Continued fraction for sqrt(985).
|
|
2
|
|
|
31, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2, 62, 2, 1, 1, 2
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
a(n)=(1/25)*{-266*(n mod 5)+29*[(n+1) mod 5]+34*[(n+2) mod 5]+39*[(n+3) mod 5]+334*[(n+4) mod 5]}-31*[C(2*n,n) mod 2], with n>=0 [From Paolo P. Lava, Jun 03 2009]
G.f.: -(x+1)*(31*x^4-29*x^3+30*x^2-29*x+31)/((x-1)*(x^4+x^3+x^2+x+1)). [Colin Barker, Aug 11 2012]
|
|
MAPLE
|
with(numtheory): Digits := 300: convert(evalf(sqrt(985)), confrac);
|
|
MATHEMATICA
|
ContinuedFraction[Sqrt[985], 100] (* or *) PadRight[{31}, 100, {62, 2, 1, 1, 2}] (* Harvey P. Dale, Sep 06 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,cofr,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|