%I #6 Mar 30 2012 18:57:23
%S 3,21,2,40,1,8,1,18,1,4,2,7,14,25,1,2,1,4,1,1,1,1,2,8,50,4,1,1,3,1,11,
%T 1,1,2,3,1,1,3,1,2,22,1,1,4,1,4,1,1,4,4,2,2,2,57,1,1,34,5,1,2,2,1,1,8,
%U 13,2,3,3,17,1,1,49,1,2,1,5,1,7,1,9,1,11,1,1,7,13,1,1,59,4,8,1,3,1,4,6,1,9,11,1,1,4,456,2,8,23,2,4,2,2,1066,1,2,2,1,11,1,3,2,26
%N Continued fraction of (e+sqrt(4+e^2))/2.
%C See A188640 and A188720.
%t r = E; t = (r + (4 + r^2)^(1/2))/2; FullSimplify[t]
%t N[t, 130]
%t RealDigits[N[t, 130]][[1]]
%t ContinuedFraction[t, 120]
%Y Cf. A188640, A188720.
%K nonn,cofr
%O 1,1
%A _Clark Kimberling_, Apr 09 2011
|