I am fitting an xgboost model with the code below.
dtrain <- xgb.DMatrix(subset(ohlcdfTrn, select = -c(annRet, actualTerm, actualReturn, total_pymnt)), lab