Plot[1 - 2^(-Floor[x]) + (x - Floor[x])/2^Ceiling[x], {x, 0, 4}]