cp's OEIS Frontend

A144790 Consider the runs of 1's in the binary representation of n, each of these runs being on the edge of the binary representation n and/or being bounded by 0's. a(n) = the length of the shortest such run of 1's in binary n.

%I A144790 #13 Oct 27 2017 20:59:56
%S A144790 1,1,2,1,1,2,3,1,1,1,1,2,1,3,4,1,1,1,1,1,1,1,1,2,1,1,2,3,1,4,5,1,1,1,
%T A144790 1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,2,1,1,2,2,3,1,1,2,4,1,5,6,1,1,1,1,1,
%U A144790 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,2,1,1,2,2,1,1
%N A144790 Consider the runs of 1's in the binary representation of n, each of these runs being on the edge of the binary representation n and/or being bounded by 0's. a(n) = the length of the shortest such run of 1's in binary n.
%H A144790 Michael De Vlieger, <a href="/A144790/b144790.txt">Table of n, a(n) for n = 1..16384</a>
%e A144790 19 in binary is 10011. The runs of 1's are as follows: (1)00(11). The shortest of these runs contains exactly one 1. So a(19) = 1.
%t A144790 Array[Min@ Map[Length, Select[Split@ IntegerDigits[#, 2], First@ # == 1 &]] &, 105] (* _Michael De Vlieger_, Oct 26 2017 *)
%Y A144790 Cf. A038374, A144789.
%K A144790 base,nonn
%O A144790 1,3
%A A144790 _Leroy Quet_, Sep 21 2008
%E A144790 Extended by _Ray Chandler_, Nov 04 2008