modified HospitalComparison.R;finished;with continue option;needs comments