Made rankhospital.R conform to assignment rqts, and initial rankhospital.R