Cleaned best function comments up a bit
Implemented rankhospital.R