Code: Lint fixes on trailing spaces

R-package/R/xgb.load.R

@@ -17,9 +17,9 @@
 #' @export
 #' 
 xgb.load <- function(modelfile) {
-  if (is.null(modelfile)) 
+  if (is.null(modelfile))
     stop("xgb.load: modelfile cannot be NULL")
-  
+
   handle <- xgb.Booster(modelfile = modelfile)
   # re-use modelfile if it is raw so we donot need to serialize
   if (typeof(modelfile) == "raw") {
@@ -29,4 +29,4 @@ xgb.load <- function(modelfile) {
   }
   bst <- xgb.Booster.check(bst)
   return(bst)
-} 
+}