Create gbm_initial.R