Update GetTheModel.R