diff --git a/R-package/R/xgb.dump.R b/R-package/R/xgb.dump.R
index 61bfe412e..3df8c9605 100644
--- a/R-package/R/xgb.dump.R
+++ b/R-package/R/xgb.dump.R
@@ -29,7 +29,7 @@
 #' bst <- xgboost(data = train$data, label = train$label, max.depth = 2, 
 #'                eta = 1, nround = 2,objective = "binary:logistic")
 #' # save the model in file 'xgb.model.dump'
-#' xgb.dump(bst, 'xgb.model.dump')
+#' xgb.dump(bst, 'xgb.model.dump', with.stats = T)
 #' 
 #' # print the model without saving it to a file
 #' print(xgb.dump(bst))
diff --git a/R-package/man/xgb.dump.Rd b/R-package/man/xgb.dump.Rd
index 6dad9ed7b..473227357 100644
--- a/R-package/man/xgb.dump.Rd
+++ b/R-package/man/xgb.dump.Rd
@@ -37,7 +37,7 @@ test <- agaricus.test
 bst <- xgboost(data = train$data, label = train$label, max.depth = 2,
                eta = 1, nround = 2,objective = "binary:logistic")
 # save the model in file 'xgb.model.dump'
-xgb.dump(bst, 'xgb.model.dump')
+xgb.dump(bst, 'xgb.model.dump', with.stats = T)
 
 # print the model without saving it to a file
 print(xgb.dump(bst))