Update xgboost_R.cpp