aweSOMdendrogram | R Documentation |
Plots the dendogram of a hierarchical clustering of the SOM prototypes.
aweSOMdendrogram(clust, nclass)
clust |
an object of class |
nclass |
an integer, number of superclasses |
Returns NULL
if nclass
is 1, or else a list
containing the indices of the SOM cells in each superclass.
## Build training data dat <- iris[, c("Sepal.Length", "Sepal.Width", "Petal.Length", "Petal.Width")] ### Scale training data dat <- scale(dat) ## Train SOM ### Initialization (PCA grid) init <- somInit(dat, 4, 4) ok.som <- kohonen::som(dat, grid = kohonen::somgrid(4, 4, 'hexagonal'), rlen = 100, alpha = c(0.05, 0.01), radius = c(2.65,-2.65), init = init, dist.fcts = 'sumofsquares') ## Group cells into superclasses (hierarchical clustering) superclust <- hclust(dist(ok.som$codes[[1]]), 'complete') ## Plot superclasses dendrogram aweSOMdendrogram(superclust, 2)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.