|
|
|
|
1, 3, 28, 59, 146, 643, 4004, 8651, 12655, 21306, 76573, 97879, 1838395, 1936274, 13456039, 15392313, 44240665, 59632978, 103873643, 475127550, 579001193, 24793177656, 149338067129, 174131244785, 845863046269, 1865857337323
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
This sequence defines equal divisions of the octave with especially accurate values for the major third, 5/4. This sequence is related to A112732, denominators of the convergents for the continued fraction for log_2(5)/4.
|
|
LINKS
|
|
|
MATHEMATICA
|
Table[Denominator[FromContinuedFraction[ContinuedFraction[Log[2, 5], n]]], {n, 1, 40}] (* Stefan Steinerberger, Apr 08 2006 *)
|
|
PROG
|
(PARI) contfracpnqn(contfrac(log(5)/log(2)), 99)[2, ] \\ M. F. Hasler, Apr 30 2020
|
|
CROSSREFS
|
|
|
KEYWORD
|
dead
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|