SimpleRegressionInR_NewYork_predict