merge data by row names in r