A215753 Denominators of the continued fraction convergents of log_10(3).
1, 2, 21, 44, 109, 153, 2098, 2251, 17855, 323641, 665137, 1653915, 2319052, 6292019, 21195109, 91072455, 112267564, 203340019, 2959027830, 6121395679, 272300437706, 278421833385, 1107565937861, 1385987771246, 20511394735305, 42408777241856, 105328949219017, 147737726460873
Offset: 0
Programs
-
Mathematica
Denominator[Convergents[Log[10,3],30]] (* Harvey P. Dale, Jan 24 2015 *)
-
PARI
{my(cf=contfrac(log(3)/log(10))); vector(#cf, i, contfracpnqn( cf[1..i])[2, 1])}
Comments