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 A175055 #10 Sep 03 2017 21:30:55 %S A175055 1,3,2,7,4,6,15,8,5,12,14,31,16,9,11,24,13,28,30,63,32,17,19,10,23,48, %T A175055 25,27,56,29,60,62,127,64,33,35,18,39,20,22,47,96,49,51,26,55,112,57, %U A175055 59,120,61,124,126,255,128,65,67,34,71,36,38,79,40,21,44,46,95,192,97,99 %N A175055 a(n) = decimal equivalent of {A033015(n) written in binary, and each run of 0's reduced in length by one digit, and each run of 1's reduced in length by one digit}. %C A175055 This is a permutation of the positive integers. Sequence A175056 is its inverse permutation. %H A175055 Michael De Vlieger, <a href="/A175055/b175055.txt">Table of n, a(n) for n = 1..10945</a> %t A175055 FromDigits[Join @@ #, 2] & /@ Map[Drop[#, 1] &, Select[Array[Split@ IntegerDigits[#, 2] &, 905], Min[Length /@ #] > 1 &], {2}] (* _Michael De Vlieger_, Sep 03 2017 *) %Y A175055 Cf. A033015, A175056, A175057, A175058, A175059, A175060 %K A175055 base,nonn %O A175055 1,2 %A A175055 _Leroy Quet_, Dec 08 2009 %E A175055 Extended by _Ray Chandler_, Dec 18 2009