From 831a102d48a33986c0619e7f7a265d974a408a9e Mon Sep 17 00:00:00 2001
From: tqchen <tianqi.tchen@gmail.com>
Date: Fri, 5 Sep 2014 22:36:59 -0700
Subject: [PATCH] add cv

---
 R-package/inst/examples/cross_validation.R | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100644 R-package/inst/examples/cross_validation.R

diff --git a/R-package/inst/examples/cross_validation.R b/R-package/inst/examples/cross_validation.R
new file mode 100644
index 000000000..abe45354d
--- /dev/null
+++ b/R-package/inst/examples/cross_validation.R
@@ -0,0 +1,9 @@
+require(xgboost)
+require(methods)
+# Directly read in local file
+dtrain <- xgb.DMatrix("agaricus.txt.train")
+
+history <- xgb.cv(list("max_depth"=3, "eta"=1,
+                       "objective"="binary:logistic"),
+                  dtrain, nround=3, nfold = 5, "eval_metric"="error")
+