Format player/item names as "Surname F."
Examples
clean_players_names(c("Roger Federer", "Nadal"))
#> [1] "Federer R ." "Nadal"      
Format player/item names as "Surname F."
clean_players_names(c("Roger Federer", "Nadal"))
#> [1] "Federer R ." "Nadal"