r How to create a new variable in a specific table from multiple conditions in