%I A128297
%S A128297 1,1,2,5,74,4735,188040808,10740045446796805,
%T A128297 1363118590418849109388908467099944,
%U A128297 31779046363111610229758725291999838369088276597741410196574625989
%N A128297 a(n) = numerator 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.
%H A128297 Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a>
(listed in lieu of email address)
%e A128297 a(6) = the numerator of b(6). b(6) = (1 +1/(1 +1/(2 +1/(5/6 +35/74))))*35/
74 = 4735/5772.
%t A128297 a = {1}; Do[AppendTo[a, FromContinuedFraction[a]/a[[ -1]]], {10}]; Numerator[a]
- Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Oct 24
2007
%Y A128297 Cf. A128298.
%Y A128297 Sequence in context: A013045 A007506 A042693 this_sequence A102983 A038583
A082080
%Y A128297 Adjacent sequences: A128294 A128295 A128296 this_sequence A128298 A128299
A128300
%K A128297 frac,nonn
%O A128297 1,3
%A A128297 Leroy Quet Feb 25 2007
%E A128297 More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com),
Oct 24 2007
|