A016534 - OEIS

%I #16 Apr 01 2024 17:12:20

%S 1,1,6,1,4,89,1,3,1,7,1,1,2,1,1,1,3,1,1,1,4,3,2,365,1,1,3,2,1,1,5,1,3,

%T 2,1,1,3,3,1,2,1,4,6,20,2,4,5,2,1,5,4,1,12,56,4,7,1,1,3,10,4,3,2,1,1,

%U 1,1,5,1,16,1,5,7,3,3,7,1,7,1

%N Continued fraction for log(13/2).

%H Harry J. Smith, <a href="/A016534/b016534.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 1.871802176901591426636255320... = 1 + 1/(1 + 1/(6 + 1/(1 + 1/(4 + ...)))). - _Harry J. Smith_, May 26 2009

%t ContinuedFraction[Log[13/2], 100] (* _Paolo Xausa_, Apr 01 2024 *)

%o (PARI) { allocatemem(932245000); default(realprecision, 21000); x=contfrac(log(13/2)); for (n=1, 20000, write("b016534.txt", n, " ", x[n])); } \\ _Harry J. Smith_, May 26 2009

%Y Cf. A016583 (decimal expansion).

%K nonn,cofr

%O 1,3

%A _N. J. A. Sloane_