OFFSET
1,2
COMMENTS
On the right side every node replaces its right child, on the left side the right children replace their parents and the left children are transferred to the same offset at the right side (staying left children). See comment at A065263.
LINKS
MAPLE
LeftChildTransferred := proc(n) local k; if(1 = n) then RETURN(1); fi; k := floor_log_2(n)-1; if(3 = floor(n/(2^k))) then RETURN((2*n)+1); fi; if(1 = (n mod 2)) then RETURN((n-1)/2); fi; RETURN(n + (2^k)); end;
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Oct 28 2001
STATUS
approved