The OEIS is supported by the many generous donors to the OEIS Foundation.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #20 Jul 09 2024 12:45:56
%S 0,1,5,11,60,371,431,2074774,2075205,4149979,10375163,24900305,
%T 60175773,85076078,145251851,230327929,1527219425,7866425054,
%U 9393644479,787538916811,5522166062156,11831871041123,17354037103279,29185908144402,46539945247681,401505470125850,2054067295876931
%N Numerators of the continued fraction convergents of log_10(7).
%C 7^(denominator of convergent) gets increasingly close to 10^a(n), agreeing to approximately a(n) digits
%t Rest[Numerator[Convergents[Log[10,7],30]]] (* _Harvey P. Dale_, Feb 16 2014 *)
%o (PARI) {my(cf=contfrac(log(7)/log(10))); vector(#cf, i, contfracpnqn( cf[1..i])[1, 1])}
%Y Denominators are in A215755.
%Y Cf. A046104, A073733, A082571, A153620.
%K nonn,frac
%O 0,3
%A _V. Raman_, Aug 23 2012
%E a(0)=0 prepended by _Andrew Howroyd_, Jul 09 2024