%I #9 May 07 2013 11:45:46
%S 1,7,3,1,1,4,57,2,3,1,5,1,3,1,2,3,9,1,2,9,3,1,18,7,1,2,6,2,1,35,2,1,5,
%T 84,3,2,7,1,1,1,28,2,1,2,1,2,3,1,2,19,1,17,1,1,8,4,3,1,81,7,1,154,24,
%U 1,65,7,3,5,94,7,1,1,8,32,3,1,1,1,3,8,2,2,2,1,5,1,2,1,1,1,7,1,5,1,3,2
%N Continued fraction for sum(k>=1, (2^k-1)^(-2) ).
%H Harry J. Smith, <a href="/A067616/b067616.txt">Table of n, a(n) for n = 1..2000</a>
%e 1.137338736344196596696913368... = 1 + 1/(7 + 1/(3 + 1/(1 + 1/(1 + ...))))
%o (PARI) { default(realprecision, 2400); x=contfrac(x=suminf(k=1, 1/(2^k - 1)^2)); for (n=1, 2000, write("b078075.txt", n, " ", x[n])) } /* Harry J. Smith, Oct 19 2009 */
%Y Cf. A065443 (decimal expansion).
%K nonn,cofr
%O 1,2
%A _Frank Ellermann_, Feb 23 2002
|