cp's OEIS Frontend

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.

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}.

This page as a plain text file.
%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