R epulet fix

R epulet fix