Complete rankhospital.R