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 A175059 #14 Oct 30 2021 04:59:17
%S A175059 1,2,3,4,6,7,8,5,12,14,15,16,9,10,11,24,13,28,30,31,32,17,18,19,20,22,
%T A175059 23,48,25,26,27,56,29,60,62,63,64,33,34,35,36,38,39,40,21,44,46,47,96,
%U A175059 49,50,51,52,54,55,112,57,58,59,120,61,124,126,127,128,65,66,67,68,70
%N A175059 a(n) = decimal equivalent of {A144795(n) written in binary, and each run of 1's reduced in length by one digit}.
%C A175059 This is a permutation of the positive integers. Sequence A175060 is its inverse permutation.
%H A175059 Michael De Vlieger, <a href="/A175059/b175059.txt">Table of n, a(n) for n = 1..10000</a>
%H A175059 <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>
%t A175059 Map[FromDigits[#, 2] &@ Flatten@ # &, Select[Array[Split@ IntegerDigits[#, 2] &, 400], FreeQ[#, {1}] &] /. w_List /; First@ w == 1 :> Most@ w] (* _Michael De Vlieger_, Sep 03 2017 *)
%Y A175059 Cf. A144795, A175055, A175056, A175057, A175058, A175060.
%K A175059 base,nonn
%O A175059 1,2
%A A175059 _Leroy Quet_, Dec 08 2009
%E A175059 Extended by _Ray Chandler_, Dec 18 2009