Almost finished rankall.R - just the removal of NA cases to implement