|
%I #15 Jan 02 2016 00:25:40
%S 3,1,1,3,10,2,11,3,2,4,1,4,4,2,32,1,3,1,50,3,4,1,1,3,1,1,1,3,1,3,2,3,
%T 3,17,1,4,5,3,5,1,6,3,1,5,1,10,2,1,4,3,1,3,3,1,3,2,1,2,9,26,1,1,20,1,
%U 1,5,1,1,4,1,2,5,1,3,5,1,1
%N Continued fraction for log(71/2).
%H Harry J. Smith, <a href="/A016563/b016563.txt">Table of n, a(n) for n = 1..20000</a>
%H G. Xiao, <a href="http://wims.unice.fr/~wims/en_tool~number~contfrac.en.html">Contfrac</a>
%e 3.56953269648137011191222241... = 3 + 1/(1 + 1/(1 + 1/(3 + 1/(10 + ...)))). - _Harry J. Smith_, May 29 2009
%t ContinuedFraction[Log[71/2],120] (* _Harvey P. Dale_, Aug 19 2011 *)
%o (PARI) { allocatemem(932245000); default(realprecision, 21000); x=contfrac(log(71/2)); for (n=1, 20000, write("b016563.txt", n, " ", x[n])); } \\ _Harry J. Smith_, May 29 2009
%Y Cf. A016612 Decimal expansion. - _Harry J. Smith_, May 29 2009
%K nonn,cofr
%O 1,1
%A _N. J. A. Sloane_
|
