From 9552f1feacd5774db5f6e3252411dde3cdb08af5 Mon Sep 17 00:00:00 2001
From: actuaryzhang <actuaryzhang10@gmail.com>
Date: Fri, 3 Feb 2017 17:11:55 -0800
Subject: [PATCH] fix error in vignettes

---
 R/pkg/vignettes/sparkr-vignettes.Rmd | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/pkg/vignettes/sparkr-vignettes.Rmd b/R/pkg/vignettes/sparkr-vignettes.Rmd
index a7cac2f503d1f..f13e0b3a18f78 100644
--- a/R/pkg/vignettes/sparkr-vignettes.Rmd
+++ b/R/pkg/vignettes/sparkr-vignettes.Rmd
@@ -744,10 +744,10 @@ predictions <- predict(rfModel, df)
 
 `spark.bisectingKmeans` is a kind of [hierarchical clustering](https://en.wikipedia.org/wiki/Hierarchical_clustering) using a divisive (or "top-down") approach: all observations start in one cluster, and splits are performed recursively as one moves down the hierarchy.
 
-```{r}
+```{r, warning=FALSE}
 df <- createDataFrame(iris)
 model <- spark.bisectingKmeans(df, Sepal_Length ~ Sepal_Width, k = 4)
-summary(kmeansModel)
+summary(model)
 fitted <- predict(model, df)
 head(select(fitted, "Sepal_Length", "prediction"))
 ```