R Studio Inner Join