gbm.R addition + predict for gbm + update constants.R