1. added framework for the rakhospital.r function
2. copy-pasted the dataloading and argumenta validation from the best.r function into this new function