|
%I #6 Mar 31 2012 13:20:27
%S 1,6,9,8,1,5,6,2,7,8,8,9,7,2,2,8,4,4,6,6,9,3,1,5,4,0,4,3,6,6,8,9,3,3,
%T 6,8,3,8,2,9,4,8,6,4,4,9,3,6,4,3,7,6,6,2,2,6,7,5,0,1,9,6,5,7,5,6,8,5,
%U 0,6,8,0,3,5,7,1,7,0,2,4,0,8,5,8,3,2,6,2,3,4,3,3,9,4,7,4,4,8,2,0,2,0,9,6,7
%N Decimal representation of continued fraction 1, 1, 2, 3, 5, 8, 13 ... (Fibonacci[n]).
%C C = 1.6981562788972284466931540436689336838294864493643766226750196575685068035717\
%C 02408583262343394744820209675493364365510752097635919...
%C C is a limit of A026822[n]/A071895[n+1] = {1, 2, 5/3, 17/10, 90/53, 737/434, 9671/5695, 203828/120029, 6939823/4086681, ...} = (1 + 1/(1 + 1/(2 + 1/(3 + 1/(5 + 1/(8 + 1/(13 + 1/(21 + 1/(34 + 1/(55 + ...
%F a(n) = limit[ A026822[n]/A071895[n+1], n->Infinity].
%t RealDigits[ Normal[ ContinuedFractionForm[ Table[ Fibonacci[k],{k,1,30}] ]], 10, 130] [[1]]
%Y Cf. A026822, A071895, A000045.
%Y Cf. A073822 (reciprocal).
%K nonn,cons
%O 1,2
%A _Alexander Adamchuk_, Jul 30 2006
%E Definition corrected by _T. D. Noe_, May 19 2007
|
