%I #5 May 01 2014 02:42:46
%S 3,1,6,2,7,12,14,4,13,5,15,24,26,28,30,8,25,9,27,10,29,11,31,48,50,52,
%T 54,56,58,60,62,16,49,17,51,18,53,19,55,20,57,21,59,22,61,23,63,96,98,
%U 100,102,104,106,108,110,112,114,116,118,120,122,124,126,32,97,33,99
%N Infinite binary tree inspired permutation of N: 1 -> 3, 11ab..yz -> 11ab..yz0, 10ab..y0 -> 10ab..y, 10ab..y1 -> 11ab..y1.
%C On the right side every node replaces its left child, on the left side the left children replace their parents and the right children are transferred to the same offset at the right side (staying right children). See comment at A065263.
%H <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>
%p RightChildTransferred := proc(n) local k; if(1 = n) then RETURN(3); fi; k := floor_log_2(n)-1; if(3 = floor(n/(2^k))) then RETURN(2*n); fi; if(0 = (n mod 2)) then RETURN(n/2); fi; RETURN(n + (2^k)); end;
%Y A057114, A065263, A065269, A065281, A065287. Inverse: A065276, conjugated with A059893: A065277 and the inverse of that: A065278.
%K nonn
%O 1,1
%A _Antti Karttunen_, Oct 28 2001
|