OFFSET
1,2
COMMENTS
LINKS
MAPLE
[seq(QuQR2toQuQR1(j), j=1..128)];
QuQR2toQuQR1 := n -> frac2position_in_0_1_SB_tree(QtoQ0_1(SternBrocotTreeNum(n)/SternBrocotTreeDen(n)));
QtoQ0_1 := r -> (((2^floor(r))-1)+(frac(r)/2))/(2^floor(r));
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Dec 07 2001
STATUS
approved