|
%I #7 Mar 07 2016 12:21:38
%S 0,1,3,2,5,6,7,4,15,10,13,12,31,14,63,8,9,30,11,20,127,26,21,24,255,
%T 62,23,28,25,126,511,16,1023,18,29,60,2047,22,27,40,17,254,4095,52,47,
%U 42,61,48,8191,510,16383,124,41,46,95,56,55,50,53,252,19,1022,32767,32,49,2046,65535,36,131071,58,125,120
%N Permutation of nonnegative integers: a(1) = 0, a(2) = 1, a(2n) = 2*a(n), a(2n+1) = 1 + 2*a(A269370(2n+1)).
%C Note the indexing: Domain starts from 1, range from 0.
%H Antti Karttunen, <a href="/A269376/b269376.txt">Table of n, a(n) for n = 1..1024</a>
%H <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>
%F a(1) = 0, a(2) = 1, a(2n) = 2*a(n), a(2n+1) = 1 + 2*a(A269370(2n+1)).
%F As a composition of related permutations:
%F a(n) = A269386(A260741(n)).
%o (Scheme, with memoization-macro definec)
%o (definec (A269376 n) (cond ((<= n 2) (- n 1)) ((even? n) (* 2 (A269376 (/ n 2)))) (else (+ 1 (* 2 (A269376 (A269370 n)))))))
%Y Inverse: A269375.
%Y Cf. A269370.
%Y Related permutation: A269378.
%Y Cf. also A252756, A269386.
%K nonn
%O 1,3
%A _Antti Karttunen_, Mar 01 2016
|
