diff --git a/R-package/tests/testthat/test_helpers.R b/R-package/tests/testthat/test_helpers.R
index 57f4c48fb..e26ec155b 100644
--- a/R-package/tests/testthat/test_helpers.R
+++ b/R-package/tests/testthat/test_helpers.R
@@ -25,3 +25,7 @@ test_that("xgb.importance works", {
   xgb.dump(bst, 'xgb.model.dump', with.stats = T)
   importance <- xgb.importance(sparse_matrix@Dimnames[[2]], 'xgb.model.dump')
 })
+
+test_that("xgb.plot.tree works", {
+  xgb.plot.tree(agaricus.train$data@Dimnames[[2]], model = bst)
+})
\ No newline at end of file