|
| |
|
|
A091808
|
|
Given the infinite continued fraction i+(i/(i+(i/(i+...)))), where i is the square root of (-1), this is the numerator of the imaginary part of the convergents.
|
|
6
| |
|
|
1, 1, 3, 6, 4, 13, 53, 111, 231, 160, 1000, 13, 4329, 693, 2083, 39014, 81188, 84477, 351597
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
COMMENTS
| The sequence of complex numbers (which this sequence is part of) converges to (i+sqrt(-1+4i))/2, found by simply solving the equation A=i+(i/A) for A using the quadratic formula. When plotted in the complex plane, these numbers form a counter-clockwise spiral that quickly converges to a point.
|
|
|
EXAMPLE
| a(6)=13 since the sixth convergent is (3/5)+(13/10)i and hence the numerator of the imaginary part is 13.
|
|
|
MATHEMATICA
| GenerateA091808[1] := I; GenerateA091808[n_] := I + I/(GenerateA091808[n-1]); GenerateNumeratorsA091808[n_] := Table[Numerator[Im[GenerateA091808[x]]], {x, 1, n}]; GenerateNumeratorsA091808[20] would give the first 20 terms.
|
|
|
CROSSREFS
| Cf. A091806-A091809.
Sequence in context: A098383 A162523 A067979 * A128719 A145691 A009782
Adjacent sequences: A091805 A091806 A091807 * A091809 A091810 A091811
|
|
|
KEYWORD
| cofr,frac,nonn
|
|
|
AUTHOR
| Ryan Witko (witko(AT)nyu.edu), Mar 06 2004
|
| |
|
|
