Create modelOptimizeR.R