Making changes to rankhospital.R