The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A164714 A positive integer n is included if all runs of 0's in binary n are of the same length, and if all runs of 1's in binary n are of the same length, and if there are at least two runs of 0's and at least two runs of 1's. 2
 10, 21, 36, 42, 54, 73, 85, 136, 170, 204, 219, 238, 273, 292, 341, 438, 528, 585, 682, 792, 819, 924, 990, 1057, 1365, 1755, 1911, 2080, 2184, 2340, 2730, 3120, 3171, 3276, 3510, 3640, 3822, 3900, 4030, 4161, 4369, 4681, 5461, 7399, 8256, 10922, 12384 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS 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. The length of each run of 1's may be different that the length of each run of 0's. This sequence contains those positive integers in both sequence A164709 and sequence A164712. The integers of this sequence, along with those positive integers that have (when written in binary) only one run of 0's and/or only one run of 1's, make up sequence A164713. LINKS Harvey P. Dale, Table of n, a(n) for n = 1..100 MATHEMATICA bslQ[n_]:=Module[{r=Split[IntegerDigits[n, 2]]}, Length[r]>3&&Length[ Union[ Length/@Take[r, {1, -1, 2}]]]==1&&Length[Union[Length/@Take[r, {2, -1, 2}]]] == 1]; Select[Range[13000], bslQ] (* Harvey P. Dale, Jan 13 2021 *) CROSSREFS A164709, A164712, A164713 Sequence in context: A250664 A082581 A075846 * A324600 A240536 A060852 Adjacent sequences: A164711 A164712 A164713 * A164715 A164716 A164717 KEYWORD base,nonn AUTHOR Leroy Quet, Aug 23 2009 EXTENSIONS More terms from Sean A. Irvine, Sep 28 2009 STATUS approved

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

Last modified April 25 01:06 EDT 2024. Contains 371964 sequences. (Running on oeis4.)