plotTreeHipamAnthropom: HIPAM dendogram

Description

This function represents a dendrogram for the clustering results provided by a HIPAM algorithm. It is a small modification of the original plot.tree function of the smida R package, available from http://www.math.rug.nl/~ernst/book/smida.html.

Usage

plotTreeHipamAnthropom(x,main,...)

Arguments

The HIPAM object to be plotted.

main

Title of the plot.

...

Other arguments that may be supplied.

Value

A device with the desired plot.

References

Vinue, G., Leon, T., Alemany, S., and Ayala, G., (2014). Looking for representative fit models for apparel sizing, Decision Support Systems 57, 22--33.

Wit, E., and McClure, J., (2004). Statistics for Microarrays: Design, Analysis and Inference. John Wiley & Sons, Ltd.

Wit, E., and McClure, J., (2006). Statistics for Microarrays: Inference, Design and Analysis. R package version 0.1. http://www.math.rug.nl/~ernst/book/smida.html.

Examples

Run this code

# NOT RUN {
dataHipam <- sampleSpanishSurvey
bust <- dataHipam$bust
bustSizes <- bustSizesStandard(seq(74, 102, 4), seq(107, 131, 6))

type <- "IMO"
maxsplit <- 5 ; orness <- 0.7
ah <- c(23, 28, 20, 25, 25)

set.seed(2013)
numSizes <- 1
res_hipam <- computSizesHipamAnthropom(dataHipam, bust, bustSizes$bustCirc, numSizes,
                                       maxsplit, orness, type, ah, FALSE)

plotTreeHipamAnthropom(res_hipam[[1]],
                       main=paste("Proposed Hierarchical PAM Clustering \n",
                       "74-78"))
# }