A270888 Numbers written in binary balanced system (A270885) have exactly three zeros.

8, 12, 14, 15, 33, 34, 35, 36, 38, 39, 40, 44, 46, 47, 49, 50, 51, 52, 54, 55, 57, 58, 59, 61, 133, 137, 138, 139, 141, 145, 146, 147, 148, 150, 151, 153, 154, 155, 157, 161, 162, 163, 164, 166, 167, 168, 172, 174, 175, 177, 178, 179, 180, 182, 183, 185, 186

Offset

1,1

Links

Table of n, a(n) for n=1..57.

Vladimir Shevelev, Two analogs of Thue-Morse sequence, arXiv:1603.04434 [math.NT], 2016.

Example

14 = 2^3+2^2+2 = 2^4-2^3+2^3-2^2+2^2-2 = 2^4-2 = 100-10_b. So, 14 is a member.

Mathematica

Select[Range@ 186, Count[Plus @@ {PadRight[#, Length@ # + 1], -PadLeft[#, Length@ # + 1]} &@ IntegerDigits[#, 2], 0] == 3 &] (* Michael De Vlieger, Mar 25 2016 *)

Crossrefs

Cf. A270885, A270886, A270887.

Sequence in context: A290135 A225533 A143845 * A281014 A048868 A244723

Adjacent sequences: A270885 A270886 A270887 * A270889 A270890 A270891

Keyword

nonn,base

Author

Vladimir Shevelev, Mar 25 2016

Extensions

More terms from Peter J. C. Moses, Mar 25 2016

Status

approved