OFFSET
0,2
COMMENTS
3^a(n) gets increasingly close to 10^(numerator of convergent).
MATHEMATICA
Denominator[Convergents[Log[10, 3], 30]] (* Harvey P. Dale, Jan 24 2015 *)
PROG
(PARI) {my(cf=contfrac(log(3)/log(10))); vector(#cf, i, contfracpnqn( cf[1..i])[2, 1])}
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
V. Raman, Aug 23 2012
STATUS
approved