A046102 Denominators of convergents to the comma of Pythagoras.
1, 1, 3, 7, 24, 31, 179, 389, 9126, 18641, 46408, 65049, 111457, 6195184, 6306641, 31421748, 100571885, 131993633, 232565518, 3620476403, 3853041921, 38297853692, 80448749305, 440541600217, 3164239950824, 3604781551041
Offset: 1
Links
- T. D. Noe, Table of n, a(n) for n=1..200
- Eric Weisstein's World of Music, Comma of Pythagoras
Crossrefs
Cf. A005664.
Programs
-
Mathematica
Denominator[ Table[ ContinuedFraction[ Log[ 2 ]/Log[ 3/2 ], i ]//Normal, {i, 30} ] ]