modify xgb.getinfo to getinfo

2014-08-27 15:03:24 -07:00
parent a060a2e9a6
commit 0f0c12707c
14 changed files with 268 additions and 256 deletions
--- a/R-package/R/xgb.load.R
+++ b/R-package/R/xgb.load.R
@@ -1,5 +1,5 @@
 xgb.load <- function(modelfile) {
-    if (is.null(modelfile))
-        stop('xgb.load: modelfile cannot be NULL')
-    xgb.Booster(modelfile=modelfile)
-}
+  if (is.null(modelfile)) 
+    stop("xgb.load: modelfile cannot be NULL")
+  xgb.Booster(modelfile = modelfile)
+}