p = predict(fit2,500) names(p)