set values in dataset in character
change stop message
simplify switch() cases
simplify best.hospital() function