Tag: R ifelse replacing text with integer