|
| |
|
|
A128293
|
|
a(n) = numerator of b(n): b(1)=1; b(n+1) = b(n) + [b(1);b(2),...,b(n)], where [...] is a continued fraction of rational terms.
|
|
2
| | |
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Next term a(10) has roughly 118 digits. - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Sep 24 2007
|
|
|
MAPLE
| L2cfrac := proc(L) local a, i; a := op(-1, L) ; for i from 2 to nops(L) do a := op(-i, L)+1/a ; od: RETURN(a) ; end: A128293 := proc() local b, n, bnxt; b := [1] ; for n from 2 to 10 do bnxt := op(-1, b)+L2cfrac(b) ; b := [op(b), bnxt] ; od: [seq( numer(b[i]), i=1..nops(b))] ; end: A128293() ; - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Sep 24 2007
|
|
|
CROSSREFS
| Cf. A128294.
Sequence in context: A067963 A059406 A042791 * A071409 A135756 A111822
Adjacent sequences: A128290 A128291 A128292 * A128294 A128295 A128296
|
|
|
KEYWORD
| frac,nonn
|
|
|
AUTHOR
| Leroy Quet Feb 25 2007
|
|
|
EXTENSIONS
| Corrected and extended by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Sep 24 2007
|
| |
|
|
