A270887 Numbers written in binary balanced system (A270885) that have exactly two zeros.

4, 6, 7, 17, 18, 19, 20, 22, 23, 25, 26, 27, 29, 69, 73, 74, 75, 77, 81, 82, 83, 84, 86, 87, 89, 90, 91, 93, 101, 105, 106, 107, 109, 117, 277, 293, 297, 298, 299, 301, 309, 325, 329, 330, 331, 333, 337, 338, 339, 340, 342, 343, 345, 346, 347, 349, 357, 361

Offset

1,1

Links

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

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

Example

19 = 2^4+2+1 = 2^5-2^4+2^2-2+2-1 = 1-1010-1_b. So 19 is a member.

Mathematica

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

Crossrefs

Cf. A270885, A270886.

Sequence in context: A102141 A107919 A165404 * A213034 A102131 A102137

Adjacent sequences: A270884 A270885 A270886 * A270888 A270889 A270890

Keyword

nonn,base

Author

Vladimir Shevelev, Mar 25 2016

Extensions

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

Status

approved