Create NewFreshman_ProjectionModel.R