r nhl16-ALLSTAR薪金，clean.r

Posted 2021-05-24

## fix missing salaries
allstar$salary[allstar$slug=='nhl-roman-josi'] <- 4000000
allstar$salary[allstar$slug=='nhl-shea-weber'] <- 14000000
allstar$salary[allstar$slug=='nhl-pekka-rinne'] <- 7000000
allstar$salary[allstar$slug=='nhl-claude-giroux'] <- 9000000
allstar$salary[allstar$slug=='nhl-kris-letang'] <- 7250000
allstar$salary[allstar$slug=='nhl-evgeni-malkin'] <- 9500000
allstar$salary[allstar$slug=='nhl-nicklas-backstrom'] <- 6500000
allstar$salary[allstar$slug=='nhl-alex-ovechkin'] <- 10000000
allstar$salary[allstar$slug=='nhl-braden-holtby'] <- 6500000