A270886 Numbers written in binary balanced system (A270885) that have exactly one zero.

2, 3, 9, 10, 11, 13, 37, 41, 42, 43, 45, 53, 149, 165, 169, 170, 171, 173, 181, 213, 597, 661, 677, 681, 682, 683, 685, 693, 725, 853, 2389, 2645, 2709, 2725, 2729, 2730, 2731, 2733, 2741, 2773, 2901, 3413, 9557, 10581, 10837, 10901, 10917, 10921, 10922, 10923

Offset

1,1

Links

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

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

Example

43 = 2^5+2^3+2+1 = 2^6-2^5+2^4-2^3+2^2-2+2-1 = 1-11-110-1_b. So 43 is a member.

Mathematica

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

Crossrefs

Cf. A270885.

Sequence in context: A135204 A037463 A309348 * A133557 A047475 A376200

Adjacent sequences: A270883 A270884 A270885 * A270887 A270888 A270889

Keyword

nonn,base

Author

Vladimir Shevelev, Mar 25 2016

Extensions

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

Status

approved