Create modelOut.R