%I #28 Jul 31 2021 19:11:20
%S 1,3,6,2,13,4,12,27,8,5,25,54,7,17,10,24,51,108,55,15,34,9,21,48,50,
%T 103,216,109,111,30,16,69,18,20,43,96,49,101,206,26,433,218,110,223,
%U 60,31,33,138,35,37,40,42,87,192,97,99,202,102,413,52,432,867,436
%N Inverse permutation to A344792.
%C This is a permutation of the natural numbers.
%C The apparent straight line commanding the top of the log/log graph (see Links) comprises coordinates of the form (A061419(k), floor(c * 2^(k-1))) where c is 1.6939... (A205083 read as a binary fraction).
%H Alois P. Heinz, <a href="/A345671/b345671.txt">Table of n, a(n) for n = 1..10000</a>
%H John-Vincent Saddic, <a href="/A345671/a345671.png">Log/log scatterplot</a>
%H <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>
%F a(A344792(n)) = n.
%e A344792(5) = 10, a(10) = 5.
%o (PARI) a(n) = my(ret=0,k=0,r); n<<=1; while(n>1, [n,r]=divrem(n<<1,3); if(r!=1, if(r,ret+=1<<k); k++)); ret+1<<k; \\ _Kevin Ryde_, Jul 10 2021
%Y Cf. A061419, A205083, A344792.
%K nonn,look
%O 1,2
%A _John-Vincent Saddic_, Jun 21 2021