How to create list with highest values in R with a tiebreaker

Question

I am trying to create a list in R of baseball players with the most hits in a year for the past 30+ years but I need there to be a tiebreaker in case two players have the sa