|
| |
|
|
A128298
|
|
a(n) = denominator of b(n): b(1)=1; b(n+1) = [b(1);b(2),...,b(n)]/b(n), where [...] is a continued fraction of rational terms.
|
|
1
| |
|
|
1, 1, 1, 6, 35, 5772, 88530295, 13109586855583296, 641514040130247702993686238424885, 38794682422831176556784792608495170681619094988640304687341019712
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,4
|
|
|
EXAMPLE
| a(6) = the denominator of b(6). b(6) = (1 +1/(1 +1/(2 +1/(5/6 +35/74))))*35/74 = 4735/5772.
|
|
|
MATHEMATICA
| a = {1}; Do[AppendTo[a, FromContinuedFraction[a]/a[[ -1]]], {10}]; Denominator[a] - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Oct 24 2007
|
|
|
CROSSREFS
| Cf. A128297.
Sequence in context: A192999 A193000 A193001 * A059059 A050112 A036125
Adjacent sequences: A128295 A128296 A128297 * A128299 A128300 A128301
|
|
|
KEYWORD
| frac,nonn
|
|
|
AUTHOR
| Leroy Quet Feb 25 2007
|
|
|
EXTENSIONS
| More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Oct 24 2007
|
| |
|
|
