corrected best.R
implemented rankhospital