|
%I #9 Sep 16 2015 04:50:38
%S 1,2,4,13,27,107,197,691,1745,5716,10126,55634,97532,293694,851363,
%T 3209923,5516821,25655598,43801187,194256443,522900074,1451913673,
%U 2455573078,15955207491,33005125266,89673108924,231135972059
%N a(n) = the denominator of the continued fraction [1;floor(n/(n-1)),floor(n/(n-2)),...,floor(n/1)].
%t Table[Denominator[FromContinuedFraction[Table[Floor[n/(n-i)],{i,0,n-1}]]],{n,1,30}] (* _Stefan Steinerberger_, May 05 2007 *)
%Y Cf. A128599, A128600.
%K frac,nonn
%O 1,2
%A _Leroy Quet_, Mar 12 2007
%E More terms from _Stefan Steinerberger_, May 05 2007
|
