How to Average Rows with the Same Name in R Using Base R and dplyr