|
%I #9 Jun 07 2017 12:59:31
%S 0,1,6,4,3,10,2,7,15,5,14,11,8,13,18,16,23,29,22,19,32,21,9,24,12,25,
%T 30,28,27,34,26,31,39,45,38,35,48,37,57,40,60,41,46,44,43,17,42,47,20,
%U 49,54,52,51,58,50,55,63,53,62,59,56,61,66,64,71,77,70,67,80,69,89,72,92,73,78,76,75,113,74,79,116,81
%N Permutation of nonnegative integers: a(n) = A268718(A268718(n)).
%H Antti Karttunen, <a href="/A268818/b268818.txt">Table of n, a(n) for n = 0..8191</a>
%H <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>
%F a(n) = A268718(A268718(n)).
%o (Scheme) (define (A268818 n) (A268718 (A268718 n)))
%o (Python)
%o def a003188(n): return n^(n>>1)
%o def a006068(n):
%o s=1
%o while True:
%o ns=n>>s
%o if ns==0: break
%o n=n^ns
%o s<<=1
%o return n
%o def a278618(n): return 0 if n==0 else 1 + a003188(a006068(n) - 1)
%o def a(n): return a278618(a278618(n)) # _Indranil Ghosh_, Jun 07 2017
%Y Inverse: A268817.
%Y Cf. A268718.
%Y Cf. also A268822.
%K nonn
%O 0,3
%A _Antti Karttunen_, Feb 14 2016
|
