Updated PowerRanking.R