The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A164709 A positive integer n is included if all runs of 1's in binary n are of the same length, and if there are at least two runs of 1's. 3

%I

%S 5,9,10,17,18,20,21,27,33,34,36,37,40,41,42,51,54,65,66,68,69,72,73,

%T 74,80,81,82,84,85,99,102,108,119,129,130,132,133,136,137,138,144,145,

%U 146,148,149,160,161,162,164,165,168,169,170,195,198,204,216,219,231,238

%N A positive integer n is included if all runs of 1's in binary n are of the same length, and if there are at least two runs of 1's.

%C Clarification: A binary number consists of "runs" completely of 1's alternating with runs completely of 0's. No two or more runs all of the same digit are adjacent.

%C For the terms of this sequence together with those positive integers that, when written in binary, each contain only one run of 1's, see A164707.

%H Harvey P. Dale, <a href="/A164709/b164709.txt">Table of n, a(n) for n = 1..1000</a>

%t r1slQ[n_]:=Module[{idn=Select[Split[IntegerDigits[n,2]],MemberQ[ #,1]&]}, Length[ idn]>1 && Length[Union[Length/@idn]]==1]; Select[ Range[ 250], r1slQ] (* _Harvey P. Dale_, Sep 29 2018 *)

%Y Cf. A164707.

%K base,nonn

%O 1,1

%A _Leroy Quet_, Aug 23 2009

%E Extended by _Ray Chandler_, Mar 15 2010

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified November 29 01:40 EST 2021. Contains 349416 sequences. (Running on oeis4.)