|
|
A175414
|
|
Those positive integers that when written in binary, the lengths of the runs of 1 are distinct and the lengths of the runs of 0's are distinct, and at least one run of 0's is the same length as a run of 1's.
|
|
1
|
|
|
2, 11, 12, 13, 19, 23, 25, 29, 38, 44, 47, 50, 52, 56, 61, 70, 71, 78, 88, 92, 95, 98, 103, 104, 113, 114, 115, 116, 125, 134, 140, 142, 152, 158, 176, 184, 188, 191, 194, 196, 199, 200, 206, 207, 208, 220, 226, 227, 230, 232, 236, 240, 242, 243, 244, 253
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
This sequence contains those positive integers in A175413 that are not in A044813.
|
|
LINKS
|
|
|
MATHEMATICA
|
f[n_] := Block[{rls}, rls=Transpose[Partition[Length/@Split[IntegerDigits[n, 2]], 2, 2, {1, 1}, 0]]; And@@Unequal@@@rls && Intersection@@rls != {}]; Select[Range[300], f] (* Ray Chandler, Oct 21 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|