The R-operator for a modular double