|
| |
|
|
A128299
|
|
a(n) = numerator of b(n): b(1)=1; b(n+1) = [b(1);b(2),...,b(n),1], where [...] is a continued fraction of rational terms.
|
|
1
| |
|
|
1, 2, 4, 24, 768, 818688, 918482792448, 1160710851973467480711168, 1851362556448808267346772937519541852218467221504, 188473437767072793673508563952884052289202111379015123907036183743886914255400892747408659578880
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| a(5) = the numerator of b(5). b(5) = 1 +1/(2 +1/(4/3 +1/(24/17 +1))) = 768/553.
|
|
|
MATHEMATICA
| a = {1}; Do[AppendTo[a, FromContinuedFraction[Join[a, {1}]]], {10}]; Numerator[a] - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Oct 24 2007
|
|
|
CROSSREFS
| Cf. A128300.
Sequence in context: A030276 A081476 A009273 * A143672 A001510 A103099
Adjacent sequences: A128296 A128297 A128298 * A128300 A128301 A128302
|
|
|
KEYWORD
| frac,nonn
|
|
|
AUTHOR
| Leroy Quet Feb 25 2007
|
|
|
EXTENSIONS
| More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Oct 24 2007
|
| |
|
|
