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.

A175022 a(n) = the number of runs (those of 0 and of 1 considered together) in the binary representation of A175020(n).

This page as a plain text file.
%I A175022 #10 Sep 03 2017 21:30:43
%S A175022 1,2,1,2,3,1,2,3,4,2,1,2,3,4,3,5,2,1,2,3,4,3,4,5,6,2,3,2,1,2,3,4,3,4,
%T A175022 5,3,5,6,4,7,2,3,2,1,2,3,4,3,4,5,3,4,5,6,4,6,5,7,8,2,3,3,4,2,2,1,2,3,
%U A175022 4,3,4,5,3,4,5,6,4,3,5,6,5,7,4,6,7,8,5,9,2,3,3,4,2,3,2,1,2,3,4,3,4,5,3,4,5
%N A175022 a(n) = the number of runs (those of 0 and of 1 considered together) in the binary representation of A175020(n).
%C A175022 a(n) gives the number of terms in row n of irregular tables A175023 and A175024.
%H A175022 Michael De Vlieger, <a href="/A175022/b175022.txt">Table of n, a(n) for n = 1..10000</a>
%t A175022 With[{s = Array[Sort@ Map[Length, Split@ IntegerDigits[#, 2]] &, 265]}, Map[Length@ Split@ IntegerDigits[#, 2] &, Values[PositionIndex@ s][[All, 1]] ]] (* _Michael De Vlieger_, Sep 03 2017 *)
%Y A175022 Cf. A175020, A175023, A175024, A175025.
%K A175022 base,nonn
%O A175022 1,2
%A A175022 _Leroy Quet_, Nov 03 2009
%E A175022 Extended by _Ray Chandler_, Mar 11 2010