rankhospital.R correct solution