A128300 a(n) = denominator 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, 3, 17, 553, 586897, 659232805921, 832815851066489242864705, 1328480976128962358175251908323023432381302392961, 135239453813936036855424384907720482197952346892608282522206946891967718839233157787733773571369

Offset

1,3

Links

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

Example

a(5) = the denominator 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}]; Denominator[a] (* Stefan Steinerberger, Oct 24 2007 *)

Crossrefs

Cf. A128299.

Sequence in context: A023150 A257116 A305375 * A292082 A001601 A061119

Adjacent sequences: A128297 A128298 A128299 * A128301 A128302 A128303

Keyword

frac,nonn

Author

Leroy Quet, Feb 25 2007

Extensions

More terms from Stefan Steinerberger, Oct 24 2007

Status

approved