r replace values in column based on multiple condition