ifelse between two numbers r