Add rankhospital.R