R/print.hclustdd.R

In dad: Three-Way / Multigroup Data Analysis Through Densities

Defines functions print.hclustdd

Documented in print.hclustdd

print.hclustdd <-
function(x, dist.print=FALSE, digits=2, ...)
{
# Display of the distances between groups (optional)
if (dist.print) 
  {cat("distances between groups\n") 
   print(x$distances, digits=digits, ...)
  }
print(x$clust)
return(invisible(x))
}

Try the dad package in your browser