|
|
A271783
|
|
Numbers that have exactly four zeros when written in binary balanced system (A270885).
|
|
1
|
|
|
16, 24, 28, 30, 31, 65, 66, 67, 68, 70, 71, 72, 76, 78, 79, 80, 88, 92, 94, 95, 97, 98, 99, 100, 102, 103, 104, 108, 110, 111, 113, 114, 115, 116, 118, 119, 121, 122, 123, 125, 261, 265, 266, 267, 269, 273, 274, 275, 276, 278, 279, 281, 282, 283, 285, 289, 290
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
30=2^4+2^3+2^2+2^1=2^5-2^4+2^4-2^3+2^3-2^2+2^2-2=2^5-2=1000-10_b, so 30 is a member.
|
|
MATHEMATICA
|
Select[Range@ 300, Length[Plus @@ {PadRight[#, Length[#] + 1], -PadLeft[#, Length[#] + 1]} &@ IntegerDigits[#, 2] /. k_ /; k != 0 -> Nothing] == 4 &] (* Michael De Vlieger, Apr 14 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|