rankhospital.R implemented