A089261 Continued fraction expansion of -x, the largest negative root of the equation Fibonacci(x) = 0.

0, 5, 2, 3, 1, 2, 2, 5, 6, 13, 2, 7, 2, 2, 1, 1, 5, 1, 4, 1, 4, 16, 1, 1, 2, 1, 1, 4, 2, 1, 1, 3, 1, 2, 2, 1, 6, 1, 4, 4, 1, 7, 2, 1, 2, 3, 1, 1, 7, 2, 1, 16, 1, 2, 1, 1, 67, 462, 1, 2, 4, 1, 3, 1, 1, 1, 1, 1, 3, 1, 1, 3, 1, 14, 1, 1, 2, 1, 1, 1, 9, 2, 2, 1, 1107, 2, 3, 10, 2, 4, 1, 1, 1, 1, 1, 44, 1, 1, 4

Offset

1,2

Links

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

Eric Weisstein's World of Mathematics, Fibonacci Number

Mathematica

ContinuedFraction[ -x/.FindRoot[Fibonacci[x]==0, {x, -0.2}, WorkingPrecision->100], 100]

Crossrefs

Cf. A089260 (decimal expansion).

Sequence in context: A244290 A175232 A074640 * A111716 A369456 A178566

Adjacent sequences: A089258 A089259 A089260 * A089262 A089263 A089264

Keyword

cofr,nonn

Author

T. D. Noe, Oct 27 2003

Status

approved