Update rankhospital.R