From 2d8646de39c0617db5d48aebcf466ca6081a6d0e Mon Sep 17 00:00:00 2001
From: Tal Galili <tal.galili@gmail.com>
Date: Sat, 17 Aug 2013 09:16:09 +0300
Subject: [PATCH] Example - trimmed a line.

---
 R/RcppDend.r             | 3 +--
 man/labels.dendrogram.Rd | 3 +--
 2 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/R/RcppDend.r b/R/RcppDend.r
index 7c90031..b9ef043 100644
--- a/R/RcppDend.r
+++ b/R/RcppDend.r
@@ -34,8 +34,7 @@
 #' R-devel-mailing list.
 #' @seealso \code{\link{labels}}, \code{\link{dendrogram}}
 #' @examples
-#' hc <- hclust(dist(USArrests))
-#' dend <- as.dendrogram(hc)
+#' dend <- as.dendrogram(hclust(dist(USArrests)))
 #' 
 #' labels(dend)
 #' 
diff --git a/man/labels.dendrogram.Rd b/man/labels.dendrogram.Rd
index f263504..fb4f671 100644
--- a/man/labels.dendrogram.Rd
+++ b/man/labels.dendrogram.Rd
@@ -21,8 +21,7 @@
   Extract the leaves labels from a dendrogram object.
 }
 \examples{
-hc <- hclust(dist(USArrests))
-dend <- as.dendrogram(hc)
+dend <- as.dendrogram(hclust(dist(USArrests)))
 
 labels(dend)