Fixed the binary(), R()