This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A333693 #8 Apr 07 2020 12:19:45 %S A333693 0,1,2,3,4,5,6,7,8,9,10,13,12,11,14,15,16,17,18,25,20,21,26,29,24,19, %T A333693 22,23,28,27,30,31,32,33,34,49,36,41,50,57,40,37,42,45,52,53,58,61,48, %U A333693 35,38,39,44,43,46,55,56,51,54,47,60,59,62,63,64,65,66,97 %N A333693 Inverse permutation to A333692. %H A333693 Rémy Sigrist, <a href="/A333693/b333693.txt">Table of n, a(n) for n = 0..8192</a> %H A333693 <a href="/index/Bi#binary">Index entries for sequences related to binary expansion of n</a> %H A333693 <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a> %F A333693 a(2*n) = 2*a(n). %e A333693 A333692(90) = 86, hence a(86) = 90. %o A333693 (PARI) a(n,base=2) = { if (n==0, 0, n%base==0, base*a(n/base, base), my (r=fromdigits(Vecrev(digits(n, base)), base)); base*a(r\base, base)+(r%base)) } %Y A333693 Cf. A030101, A333692. %K A333693 nonn,base %O A333693 0,3 %A A333693 _Rémy Sigrist_, Apr 04 2020