rankhospital.R ver 1.0
wrong "copy-and-paste" version