A059855 Period of continued fraction for sqrt(n^2+4), n >= 1.

1, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2

Offset

1,2

Comments

From Jianing Song, May 01 2021: (Start)

The old name was "Quotient cycle length of sqrt(n^2+4)."

Essentially the same as A010695 and A021400. (End)

Links

Table of n, a(n) for n=1..100.

Formula

a(n) = 2 for even n, a(n) = 5 for odd n > 1.

a(n) = A003285(n^2+4). - Jianing Song, May 01 2021

Example

For even n, sqrt(n^2+4) = [n; n/2, 2*n], hence a(n) = 2.
For odd n > 1, sqrt(n^2+4) = [n; (n-1)/2, 1, 1, (n-1)/2, 2*n], hence a(n) = 5.

Maple

with(numtheory): [seq(nops(cfrac(sqrt(k^2+4), 'periodic', 'quotients')[2]), k=1..100)];

Mathematica

a[n_] := Length @ ContinuedFraction[Sqrt[n^2 + 4]][[2]]; Array[a, 100] (* Amiram Eldar, May 13 2020 *)

Crossrefs

Cf. A003285, A010695, A021400.

Period of continued fraction for sqrt(n^2+k): A059853 (k=3), this sequence (k=4), A059854 (k=5).

Sequence in context: A073054 A010695 A021400 * A082881 A104289 A309697

Adjacent sequences: A059852 A059853 A059854 * A059856 A059857 A059858

Keyword

nonn,easy

Author

Labos Elemer, Feb 27 2001

Status

approved