add saveload to raw

This commit is contained in:
tqchen 2015-02-01 21:19:24 -08:00
parent dc3003cefd
commit 1d21ff87ff

View File

@ -62,7 +62,7 @@ print(paste("sum(abs(pred2-pred))=", sum(abs(pred2-pred))))
raw = xgb.save.raw(bst)
# load binary model to R
bst3 <- xgb.load(raw)
pred3 <- predict(bst2, test$data)
pred3 <- predict(bst3, test$data)
# pred2 should be identical to pred
print(paste("sum(abs(pred3-pred))=", sum(abs(pred2-pred))))