R . till enmängd