login
Inverse permutation to A341335.
2

%I #12 Apr 25 2021 15:13:29

%S 0,1,3,2,7,6,5,4,14,15,12,13,11,10,9,8,29,28,31,30,25,24,27,26,23,22,

%T 21,20,19,18,17,16,59,58,57,56,63,62,61,60,50,51,48,49,54,55,52,53,46,

%U 47,44,45,42,43,40,41,39,38,37,36,35,34,33,32,119,118,117

%N Inverse permutation to A341335.

%H Rémy Sigrist, <a href="/A341336/b341336.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>

%e A341335(42) = 52, so a(52) = 42.

%o (PARI) a(n) = { my (c=binary(n), b=c); for (m=1, #b, fordiv (m, d, if (d<m, b[m] = (b[m] + b[d])%2))); fromdigits(b, 2) }

%Y Cf. A341335.

%K nonn,base

%O 0,3

%A _Rémy Sigrist_, Apr 25 2021